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Editorial i 



Liebe Leser, 

die CeBit '87 ist zu Ende. Langsam aber sicher kehrt wieder die Normalität in den Alltag zu¬ 
rück. Die 7-Tage Show gilt in der Regel als richtungsweisend für künftige Technologien, so nutz¬ 
ten auch mehr als 2200 Aussteller aus 35 Ländern die Gelegenheit, ihre Produkte und Innovatio¬ 
nen einer breiten Öffentlichkeit darzubieten. 

Neues gibt es immer wieder zu sehen, Sensationen können wir allerdings nicht vermelden. 

Die in der Fachpresse groß angekündigten IBM kompatiblen PC's von Atari und Commodore 
konnten, zumindest was die Präsentation anbelangt, die hohen Vorschuß-Lorbeeren nicht bestä¬ 
tigen, und gingen im Trubel um die Ami gas, ST’s und Schneider PC’s unter. 

Schneider verfolgt weiterhin, ein für den Anwender durchschaubares Konzept (siehe auch Inter¬ 
view mit Fred Köster in diesem Heft), und präsentierte eine Version des PC 1512 mit Herkules- 
Grafikkarte. Dieses Paket wird als Umbausatz mit Grafikkarte für DM 348, — für monochrom 
Monitore erhältlich sein. An einer Lösung für den Farbmonitor wird zur Zeit gearbeitet. Mit die¬ 
ser Erweiterung wird eine deutlich bessere Auflösung erzielt, die zahlreichen Kunden und Inter¬ 
essenten waren-zufrieden. 

Nach wie vor erfreut sich der Joyce großer Beliebtheit, vermißt werden lediglich Informationen 
in Form von Fachzeitschriften bzw. Büchern. Da kommt unser Joyce-Sonderheft genau richtig, 
ab 15. April wird es im Bahnhofs-Buchhandel oder direkt beim Verlag erhältlich sein. 

Die Verunsicherung vieler CPC-Anwender, was die Zukunft ihrer Systeme anbelangt, muß zumin¬ 
dest nach der CeBit als unbegründet abgewiesen werden. Der CPC 6128 wird nach wie vor in 
großen Stückzahlen verkauft. Für den CPC 464 haben sich die Verantwortlichen etwas einfallen 
lassen. Der klassische Heimcomputer erlebt mit dem 464 neuen Aufwind. Ab sofort wird der 464 
mit (für DM 498, —) oder ohne Monitor (für DM 298, —) erhältlich sein. 

Wir von der Schneider International begrüßen diese Entwicklung und sind ms sicher, daß sich 
die CPC-Familie auch in Zukunft großer Popularität und Beliebtheit erfreuen wird. 

Einen ausführlichen Messebericht der CeBit ’87 bringen wir im nächsten Heft, bis dahin wün¬ 
sche ich Ihnen viel Spaß bei der Lektüre. 


Herzlichst Ihr 



Stefan Ritter 
Chefredakteur 
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Eine Bitte an unsere Leser 


Die Rubrik »Leserbriefe« ist eine 
Einrichtung für alle Leser, die in 
irgendeiner Form Fragen, Proble¬ 
me oder Anregungen zu Produk¬ 
ten, Programmierproblemen oder 
zu unserer Zeitschrift haben. 
Selbstverständlich sind wir be¬ 
müht, alle Leserfragen zu beant¬ 
worten. Doch haben Sie bitte Ver¬ 
ständnis, daß wir nicht alle einge¬ 
henden Briefe persönlich beant¬ 
worten können. Oft erreichen uns 
mehrere Briefe zum gleichen The¬ 
ma, einer davon wird dann stell¬ 
vertretend für alle in unserer Zeit¬ 
schrift beantwortet. Da auch wir 
nicht alle Fragen auf Anhieb be¬ 
antworten können, müssen wir re¬ 
cherchieren. Und das dauert be¬ 


kanntlich seine Zeit! Wir möchten 
hiermit alle PC-Leser noch einmal 
auf unseren Leserservice hinwei- 
sen und bitten bei der Vielzahl der 
eingehenden Briefe um etwas Ge¬ 
duld. Für eilige Anfragen steht un¬ 
sere Redaktion jeden Mittwoch 
von 17 bis 20 Uhr am »Heißen 
Draht« zur Verfügung. Vielen 
Dank für Ihr Verständnis. 

Ihre PC-Redaktion 


PS: Die Redaktion behält sich 
vor, Leserzuschriften in gekürz¬ 
ter Form wiederzugeben. 


elektro GmbH 

Delsterner Straße 23 
5800 Hagen 1 
Telefon 0 23 31 / 7 26 08 


Kein 

Aprilscherz 

Schneider PC 1512 

MM/SO mil 30 MB Feslspeicher 3748, - DM 
CM/SD mit 30 MB Festspeicher 4248 - DM 

Schneider PC 1512 MM/DD 
»640 kB Ram« 

Drucker DMP 3000 anschlußfertig 
1000 Blatt Endlospapier microperforierf 
10 Leerdisketten in Diskettenbox 
1 Buch »Der Schneider PC“ 

1 Abdeckhaube für PC 
1 Abdeckhaube für DMP 

3333, - DM 

Otxaes Angebot mit CM/DO -r 500,- DM 


Sie haben: 2888, - DM 
Wir haben: 

1 Schneider PC 1512 MM/SD 
1 Schneider DMP 3000 anschlußfertig 
1 Abdeckhaube für PC 
1 Abdeckhaube für DMP 
1 Textverarbeitung »Witch Pen« 

(die mit dem Blitzwörterbuch) 

Na, interessiert? 


PC Software 

Star-Writer PC Version 2.0 398 - DM 
Schneider Wordstar 1512 199,-DM 

Sybex StarKontor PC 

Textverarbeitung 125,- DM 

Adreßverwaltung 95,- DM 

Dateiverwaltung 145,- DM 

Fakturierung 175,- DM 

Finanzbuchhaltung 350,- DM 

Lagerverwaltung 175,- DM 

Lohn und Gehalt 175,- DM 
Dos-Manager 75,- DM 


Barkauf - Mietkauf 
Zielkauf 

Leasing 

für den gewerblichen Anwender nur in 
unserem Ladengeschäft möglich. 

Alle Produkte der Schneider-Computer- 
Division lieferbar. 

Drucker verschiedener Hersteller. 
Ausgesuchte Software für alle Schneider 
Computer. 


Fciirliglit-Pcitch 
Heft 2/87 
... SORRY... 

Wie ich inzwischen erfahren 
habe, hat THE EDGE seit 
neuestem zwar nicht das Pro¬ 
gramm verbessert, wohl aber 
den Kopierschutz. Somit ist es 
bei zumindest einer Version 
nicht mehr möglich, das 52 
KByte lange Hauptfile zu iso¬ 
lieren. 

Macht aber nichts, die Floppy 
läßt sich auch noch anders 
austricksen, allerdings etwas 
umständlicher, indem die Zeit¬ 
verzögerung ßr MOTOR-AUS 
von den standardmäßigen 5 
Sekunden auf die minimal 
möglichen 100 ms. gesenkt 
wird. 

Das beigefügte Basic-Listing 
erzeugt ein File namens FAST- 
STOP.COM, welches den Ti¬ 
meout entsprechend herab¬ 
setzt. (Bitte schreiben Sie das 
Programm nicht auf Ihre ori¬ 
ginal FAIRLIGHT-Disk). 

4 ' FAmiOP-Lader 1987 byM. A. 

6 ' setzt MOTOR-OFF auf 100 ms. 

8 ’ 

10 DATA &H21,&HI6AH01,&H1I,&H00 
20 DATA &HC0,&HOl,&HO7,&H0O l &HED 
30 DATA &HB0.&H21 ,&HOO,8J1CO,&HCD 
40 DATA &H5A ,&HFC,&H83,&HOO,&HC3 


50 DATA &H0O,&H00,&H0A,&mi,&HAF 
60 DATA &H1E.&H08.&HOF.&H03 
65 ■ 

70 RESTORE 

HOOPEN "0 ", 1 “FASTNTOP.COM " 

90FORM TO29 

100 READ A : PRINT #1,CHR$(A); 

UONextlNext 

120 CLOSEI 

Starten Sie also in Zukunft erst 
FASTSTOP von einer anderen 
Disk, bevor Sie FAIRLIGHT 
von der Originaldisk laden. 
Die Floppy geht dann mit 
ziemlicher Sicherheit rechtzei¬ 
tig aus, es kann aber sein, daß 
der Ladevorgang etwas »holp¬ 
riger« wird. Nicht gerade ele¬ 
gant, aber besser als stunden¬ 
lange Hintergrundgeräusche. 
(Und insofern etwas anwen¬ 
derfreundlicher, als nicht im 
Programm herumgepfuscht 
werden muß...) 

(M. Anton) 


C für Joyce 

Brief von Herrn Friedhelm 
Seher, Maintal 1. 

Für CPC 6128 und Joyce gibt 
es folgende C-Compiler von 
HiSoft (180 High Street North, 
Dunstable, Beds LU6 1ÄT, 
Großbritannien) 


HiSoft C+ + Compieler unter 

CP/M 

Abweichungen von Keming- 

ham und Ritchi: 

— kein Gleitkomma (float, 
double) 

— keine Bitmuster 

— Typumwandlung mit Ope¬ 
rator cust 

— zusätzliche inline Anwei¬ 
sung, um Maschinencode 
einzufügen. 

— direkte Übersetzung in 
COM-Datei, deshalb kei¬ 
ne Möglichkeit, Routinen 
mit Linker einzubinden. 
Routinen können im Quell¬ 
code mit include eingefügt 
werden. 

Bibliotheken: 

— stdio.lib Standardfunktion. 

Einige Funktionen 
(wie prinlf) stehen 
nicht in stdio.lib, 
sondern sind im 
Compiler einge¬ 
baut. 

— cpm.lib CP/M- 

Funktionen, wie 
Aufrufen des Di¬ 
rectory, BDOS- 
Aufrufe. 

— gsx. lib Graphikfunktio¬ 

nen für GSX 

Zugaben: 

— Editor ßr Quelltexte 

— Verbesserter GSX-Bild- 
schirmtreiber für Joyce 

Handbuch (Ordner mit losen 

Blättern) in Englisch. 

(Ich habe den HiSoft C++ 

Compiler auf dem CPC 6128) 
Hans Maas 
Bremen 1 


Help f or tue 
Hacker, 

CPC Schneider International 
Heft 11/1986 

Auch ich muß leiderzugeben, 
daß ich als Neuling auf dem 
JOYCE so meine Probleme 
hatte, mit dem in Heft 11/86 
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abgedruckten Programm 
»PRTHELP« die deutsche Ver¬ 
sion der Datei HELP.HLP 
auszudrucken. 

Nicht nur, daß die lästigen 
SUB-Codes ftZ bzw. &H1A) 
beseitigt werden müssen, auch 
sind in der Datei einige Son¬ 
derzeichen vorhanden, die 
nicht korrekt vom Drucker 
verarbeitet werden. 

Doch zunächst muß eine 
druckfähige Help-Datei er¬ 
stellt werden. Da ich, wie auch 
vermutlich die meisten 
JOYCE-Benutzer, nicht über 
einen Zweit-Rechner verftige, 
kann also die Lösung der Ehe¬ 
leute Sinhart nicht so ohne 
weiteres durchgeführt werden. 
Aber es geht auch ohne Zweit- 
Rechner: 

Zuerst kopiert man folgende 
Dienstprogramme von den Sy¬ 
stemdisketten auf die RAM- 
disk (Laufwerk M): 
ERASE.COM (Systemdiskette 
Seite 2) 

PIP.COM (Systemdiskette 
Seite 2) 

SID.COM (Systemdiskette 
Seite 3) 

HELP.COM (Systemdiskette 
Seite 4) 

HELP.HLP (Systemdiskette 
Seite 4) 
mit Option (O) 

Danach führ man folgende 
Operationen durch (Eingaben 
sind fett gedruckt, [ ] entsp. 
ÄÜ, alle Eingaben mit »Re¬ 
turn« beenden). 

A>M: (Laufwerk M wird zum 

Standard-Laufwerk) 
M>Help [EXTRACTJ (Erzeugt eine 
Datei HELP.DAT) 
Extracing data.... Extraction complete 
HELP.DAT created 

Die Datei HELP.DAT enthält 
nun den kompletten Text für 
unseren Ausdruck, mit Aus¬ 
nahme des lnhaltsverz.eichnis- 
ses (und darin befinden sich 
die zu löschenden SUB- 
Codes). 


Als nächstes muß also noch 
das Inhaltsverzeichnis erstellt 
werden: 

M>SID (Symbolic Instruc¬ 
tion Debugger laden) 

CP/M 3 SID-Version 3.0 

# rHELP.HLP (HELP.HLP 
wird in den Speicher gelesen) 
? 

#sl2C 

012C JA 00 (SUB-Code lö¬ 
schen) 

012D 00 . 

#s63E 

063E 1A 00 (SUB-Code lö¬ 
schen) 

063F OL . 

# wHELP. INH, 100,7FF 

(schreibt eine Datei HELP. 
INH, die das Inhaltsverzeich¬ 
nis enthält.) 

000Eh record(s) written. 

# C (STOP-Taste gedrückt) 
M> 

Nun haben wir zwei Dateien, 
eine enthält das korrigierte In¬ 
haltsverzeichnis (HELP. INH), 
die zweite enthält den Text 
(HELP.DAT)). 

Nun müssen beide noch zu ei¬ 
ner neuen Datei HELP.HLP 
zusammengefaßt werden: 

M>ERA HELP.HLP (die »alte« 
HELP.HLP-Datei wird gelöscht) 

M > PIP 

HELP. HLP=HELP. INH, HELP 
DAT[0] 

M>PIP. A:=HELP.HLP[0] 

(HELP.HLP wird auf eine Diskette in 
Laufwerk A kopiert) 

Damit befindet sich auf der 
Diskette in LmifwerkA unsere 
bearbeitete HELP.HLP-Datei 
und kann ausgedruckt werden. 

Norbert Finke 
Erndtebrück 


BET-DATEIEN 

modifiziert 

Seit einiger Zeit verwende ich 
mit ausgezeichnetem Erfolg ei¬ 
nen Joyce-PCW 8256für die 
Auswertung bzw. Erstellung 
von Ergebnislisten bei Schüt¬ 
zenmeisterschaften. Ich habe 
dazu das im CPC-Journal, 


Heft 5/86 veröffentlichte Basis¬ 
programm »Jet-Datei« ent¬ 
sprechend modifiziert und bin 
jetzt in der Lage, etwa eine 
Stunde nach Meisterschaftsen¬ 
de die komplette Ergebnisliste 
in Schöndruck zu liefern. 

Für Anwender des Basispro¬ 
gramms möchte ich, so wie ich 
glaube, einen wichtigen Hin¬ 
weis liefern. Die Option »Satz 
Löschen« funktioniert nur bei 
»eindeutigen« Indexsätzen, 
d.h. wenn jeder Indexbegriff 
nur einmal erscheint! 

Sobald aber ein Indexbegriff 
mehrmals vorkommt — was 
Z.B. bei Ortsnamen ohne wei¬ 
teres passieren kann — wird 
der Satz falsch gelöscht. 

Es wird oft nicht der zum Satz 
zugehörige Indexbegriff ge¬ 
löscht, sondern der erste glei¬ 
che Indexbegriff, den das Pro¬ 
gramm bei der Suche findet — 
und damit ist die Datei zer¬ 
stört. 

Zur Behebung dieses Pro¬ 
blems müssen die Indexbegrif¬ 
fe nicht über den Begriff selbst 
gesucht werden, sondern sie 
müssen über die Satznummer 
angesprochen werden. 

Man braucht im Programm die 
Zeile 2620 nur wie folgt zu än¬ 
dern: 

2620 index$ =UPPER$ (LEFI$(dat.feld$ 
(x),5):leer=5-LEN (index$): 
index$=index$+SPACE$ (leer) Ergebnis 
=DELKEY( # I ,OrX,index$,satznum) 

In der Hoffnung einigen Joyce- 
Anwendern damit einen hilf¬ 
reichen Hinweis gegeben zu 
haben — zumal ich Jetsam für 
einen leistungsstarken und in¬ 
dividuellen Ansprüchen aus¬ 
gezeichnet anpaßbaren Be¬ 
fehlssatz für Dateiverwaltung 
halte — verbleibe ich mit be¬ 
sten Grüßen 

Dipl. Ing. Pöintner Peter 
A 8700 Leoben 


Ahnataler Computer Laden 
BOLL COMPUTER- UND 
SOFTWARE-VERTRIEB 
3501 Ahnatal - Weimar 
Wllhelmsthaler Straße 26 B 


Tel. (0 56 09) 28 56 


CPC 464, grüner Monitor 

648,- 

CPC 464, Farbmonitor 

129B,— 

CPC 61Z8, grüner Monitor 

999,— 

CPC 6128, Farbmonitor 

1699,— 

DDI-1, Dlskettenlaulw mit Contr 

498,- 

FD-1, Diskettenlaufwerk 

498,- 

MP-2, Fernsehadapter für CPC 

148,- 

Joystick’*, große Auswahl ab 

10,- 

RS 232 C für CPC 6128. Netzteil 

178,— 

Druckerkabel tür CPC 4641664/6128 

49,50 

Interface DMP 2000 an C64/128 ab 

148,- 

Schneider 3" Disketten 2er Pack 19,50 

Schneider 3“ Disketten 5er Pack 47,50 

Schneider 3“ Disketten 10er Pack 95.— 

Maxell CF2 10er Pack 89,- 

CF2-DD Diskette lür MB LW 

19,80 

Farbband lür DMP 2000/3000 

19,80 

Farbband für JOYCE 

24,50 

VORTEX 5,25“ Diskettenlaufwerke 


F1-X./08 KB für CPC 464/6128 

758,— 

F1-S, 7C8 KB lür CPC 464/6128 

998,- 

Speichere Weiterung SP 256 


lür CPC 464/664 aul 256 K8-RAM 

298,— 

SP 256 mit B0S 2 0 

349,- 

MS-DOS Emulator PC 88 

aA 

JOYCE PCW 8256, 256 KB. 1 LW 

1799,— 

JOYCE PLUS PCW 8512, 


512 KB, 2 LW. 1 MB 

2490,- 

RAM-Erwelterung aut 512 KB 

148,- 

Aufrüstung 2 LW. 1 MB, lür Joyce 

698,- 

LocoScrtpt Übungsdiskette 

29,50 

Schneider PC MM/SD 

1999,— 

Schneider PC MM/DD 

2499,- 

Schneider PC CM/SD 

2499,- 

Schneider PC CM/DD 

2999,- 

Schneider PC MM/HD 20 

3999,- 

Schneider PC CMfflD 20 

4499,- 

Schneider Wordstar 1512 

199,- 

10 Schneider Disketten 5,25 J 

39,50 

VORTEX 20 MB Drive Card 

1398,- 

Herkules-Kaite komp 

198,- 

TTL-Monftor, EIZ0, S/W/Revers 

498,- 

RAM-Aulrüstung aul 640 KB 

128,- 

RAM-Bausatz 128 KB. ohne Einbau 

75.- 

Schneider Matrixdrucker 


DMP 2000 tür CPC 

598,- 

DMP 3000 lür CPC 

648- 

Seikosha - Matrixdrucker 


SP 1200 9-Nadel-Druckkopt 


120 CPS, NLQ 20 CPS, Traktor 

699.- 

SL 80 AI 24-Nadcl-Druckkool 


135 CPS, L0 54 CPS, Traktor 

1298,- 

MP 1300 Ai 9-Nadel-Druckkopf 


300 CPS, NLQ 50 CPS. Traktor 

1499.— 

PC-Bücherauswahl 


Einführung in Pascal 

48,- 

Arbeiten mil Symphony 

125,— 

MS-DOS 3.2 

49.- 

Arbeiten mit dBase II 

54.- 

Basic 2 unter GEM-Desktnp 

59,- 

SOFTWARE - Auswahl 


Markt + Technik Junior Serie 


dBase II 

399,- 

Framework 1 

399,- 

Wordstar 

399.— 

Multiplan 

298,- 

Neu bei Ihrem Star-Olvision-Fachhändler: 

Star-Writer PC Textverarheitung, Adressver 

wallung. Grafikprogramm, DFU-Programm 


- Neue Version 

398 - 

FIBU-SSTAR PCV1.0 

398 - 

PC-SPIELE: PSION-CHESS, 


SUMMER GAMES II, WORLD GAMES Ja 69,90 

Das ist nur ein Auszug aus unserem ständigen Lieler- 

programm Wir bieten Ihnen eine große Auswahl an 

Druckern, Monitoren, Kabeln, EDV-Zubehör, Paoier und 

elektronischen Bauteilen 


Ihre Vorteile: 


1 Beratung isl lür uns selbstverständlich 


2 Einweisung in die Bedienung der Ge'ate 


3 Bei umfangreichen Beratungen bitten wir Sie um 

Terminabsprache 


4. Sottware-Bearbeilung nach Maß 


5. Reperalur-Service 


6 Inzahlungnahme möglich 


Geschäftszeiten: Mo —Fr 10—12 und 14—18 Uhr 

Sa 9-13 30 Uhr 


Versandkostenpauschale: 8.- DM 


Ihr autorisierter Schnelder-Fachhändler 
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11530 z#=ftl D*( STR#< n 1,2) + " MEHORY V+HEX* (zps- 1,4) + ":dz="+HID*(STR»<n + 
za*9) ,2) '-PRINT#9,z*:PRINT z»:n=n+za 

11535 z*=H 1D*(STR*( n ), 21 +" FOR adr=8."+HEX* (zps, 4) +" TO 8."+HEX*(zpc-l ,4) 
:PRINT«t9,z*:PRINT z#:n=n+za 

11540 z*=M1D*(STR#< n !, 2) + " READ a*:dat=dat+l“:PKlNHt9,Z*:PRINT z#:n=n + 

11545 Z*=H1D» (STK# ( n ), 2 I + " 3Z=3Z+VA1,( “+CHR»( 34 ) + 'S. ■ +CHR*(34 ) + *+a» I = POKE 
adr,VAL( "+CHR* (34 ) + “ 8. “+CHR*( 34 ) + * + a* ) * : FRX NT#9, z* : FR INT z*:n=n-tza 

11550 z*=HII>*(STR*(n),2> + * IF dat<*+H1D#(STR*(abs((zpc-zps<81 *(zpc-zps) 
+0*<zpc-zps>7)),21)+" AND adr<8.“+HEX*(zpc- 1,4) + • THEN GOTO"+STR*( 
n+za*4):FRINT#9,z#:PRINT z»:n=n+za 

11555 z*=HID® (STR# (nI,2)+" READ checksum ■: PRINTN9, z»: PRINT z*:n=n-*za 

11560 z#=HID»<STR»(n1,21 + “ IF checksui<>az THEN PRINT"+CHR*(34) + "FEHLER 
in Zeile: "+CKR# (341+"(dz :END“ : FKI NT#9, z*: PRINT 2 *:n=n+za 

11565 z*=HID*(STR#(n),2)+' dz=dzt‘HlD*(STR*(za).21+■:sz=0!dat=0':PRINT* 
9,2*:PRINT z* = n=n+za 

11570 2 *=KID*(STR*(n),21 +" NEXT adr' 

11575 sa=zpa:PRtNT«9,z#:PRINT z*; 

11580 n=n+za:checksuB=0:z»=HID*(STR»(nl,2)+" DATA ' 

I1585 FOR 1=1 TO 8:1F sa=2pc THEN 11660 

11590 z*=z*+HEX#(PEEK(sa-dadr1, 2) + “,":checksum=checkaua+PEEK(sa):sa=sa+ 
1 •• NEXT 

11595 z*=z*+HID*(STR*<checksu»S , 21 :PR1NT#9,z*:PRI NT z*i:IF sa<zpc THEN 
11630 


RB - Software 

Industriestr. 21 
2262 Leck (NF) 
Tel. 046 62/5226 


Ihr Partner 
in Sachen 
Computer 


Unser Topangebot: 

Schneider PC 1512 IBM-kompatibel 




ab 1899,- 

Vortex 20 MB Drivecard 




DM 1398- 

kostenlose Info anfordern 


Software für Schneider 464/664/6128 

z.B.: 



Westbank 

DM 11,90/18,90 Cass'fDisc* 

Marble Madness 

DM 20,90 

Impossball 

DM 18,90/29,90 Cass. /Disc 

Elevator Aclior 

DM 18,90/25.90 Cass. /Disc* 

Bomb Jack II 

DM2790 

Disc* 

Bomb Jack 

DM 16,90 

Cass* 

Tobruk 1 

DM 34,90 

Cass 

Tobruk 2 

DM 34,90 

Cass. 

1942 

0M 42,90 

Disc 

ACE 

DM 37,90/47,90 Cass. /Disc 

Eagle Nest 

DM 27,90/47,90 Cass. /Disc. 

uvm 



Software für Schneider PC 1512 

Summergames 


DM 59,- 

Winlergames 


DM 59- 

Chess 


DM 59,- 

Mean 18 Goll 


DM 59,- 

uvm 



kostenlose Info anfordern 



"*■ = deutsche Anleilung 
Unsere Versandkostenpauschale belrägl; 
für Software DM 3- 
iür Hardware DM 6,- 


Philosoft® 

Pariser Platz 2 
8000 München 80 
089-4482601 


TEXTVERARBEITUNG + 
MODEMPROGRAMM 

Darstellung von Fettschrift. Kur¬ 
sivschrift, Unterstreichen, Indizes 
und hochgestellte Schrift-t-Grafik 
auf dem Bildschirm! Blockbefeh¬ 
le. Absatz/Seitenumbruch, Su¬ 
chen/Ersetzen, horizontales 
Scrollen Druckeranpassung, 
perfekt, superschnell! Mailboxbe¬ 
trieb, Textspeicher Senden und 
Empfangen mit und ohne Prüf¬ 
protokoll (MODEM7 kompatibel)! 

CPC-Diskette 89, - 


ASSEMBLER + TESTER 

Sehr schneller Assembler für 
Z80, 8080, 8085 und 8048 Opco- 
des, 26 Pseudo-Opcodes! Sym¬ 
bolischer Tester mit 26 Funktio¬ 
nen incl Multi-BP, Datentransfer, 
EPROM programmieren! 

CPC-Diskette 129. - 


Komplette Software wie oa. im 
EPROM auf Erweiterungskarte 
für alle CPC’s: 

Komplett 279, - 

dazu als Option: 

RS232 Schnittstelle 119, - 
EPROM-Progr.-Gerät 119, - 

für 2716 bis 27256 

Info anfordern! 


r~ Briefe 

Assembler Tips 

Tip Nr. I: 

Ein großes Manko beim CPC- 
Intemational-ZSO-Assembler, 
das sich allerdings relativ ein¬ 
fach beheben läßt, ist dm Feh¬ 
len einer Prüfsumme im Basic- 
Lader eines Maschinen¬ 
sprache-Programms. 

Nach folgenden Änderungen 
im Z80-Assembler, steht ein 
Prüf summe n-Generator be¬ 
reit, der nach jeweils acht By¬ 
tes eine Prüfsumme in das 
Basic-Lader-Programm ein¬ 
fügt. 

Läßt man nun den Basic- 
Lader laufen, so überprüft er, 
ob alle Prüfsummen stimmen, 
und meldet sich mit einem 
»Fehler in Zeile:« zurück, falls 
eine Prüfsumme nicht korrekt 
ist. 

Obenstehende Zeilen sind so 
zu ändern, bzw. zu ergänzen: 

Tip Nr 2: 

Die nachfolgenden Zeilen er¬ 
möglichen es, Labelnamen mit 
einer max. Länge von 10 Zei¬ 
chen imZ80-Assembler zu ver¬ 
wenden. Dies wird erreicht 
durch das geänderte String¬ 
handling in Zeile 11620 und die 
geänderte Ausgabe auf Bild¬ 
schirm und Drucker in Zeile 
11370: 

11370 PRINT#a,TAB(20);la$;TAB 
(30);bJ$;TAB(36);op$;TAB(52);km$ 
11620 a$=LEFlS <a$,I0): RETURN 

Tip Nr. 3: 

Vor dem Abspeichem eines 
Quellcode-Listings wird der 
Basic-Programmzeiger 
(=qpc) so verändert (POKE 
qpc,0), daß nur der Assem¬ 
blerteil, und nicht auch der ei¬ 
gentliche Assembler, abge¬ 
speichert wird. Nach dem Ab¬ 
speichem wird dieser Zeiger 
wieder korrigiert (POKEqpc, 
lz). Dies geschieht in Zeile 
11480 

11480 IF a$= “q" THEN POKE 
qpc.O.SAVE na$+ "-qc",A:POKE 
qpc.lz.GOTO 11450 


Gibt man nun beim Start der 
Assemblers einen unzulässi¬ 
gen Filenamen ein, indem man 
Z.B. nur die < RETURN >- 
Taste drückt, so tritt beim Ab¬ 
speichem die Fehlermeldung 
»Bad Command« auf. 

Listet man nun das Programm 
(Assembler-Quellcode und 
Z80-Assembler), so stellt man 
nun mit Entsetzen fest, daß der 
Z80-Assembler »verschwun¬ 
den« ist! 

Aber alles ist halb so schlimm, 
wie es aussieht. Nachdem man 
folgenden Befehl eingibt: 
POKE qpc.lz 

ist auch der Z80-Assembler 
wieder da! 

Diese recht umständliche Met¬ 
hode kann man das Programm 
aber auch selbst erledigen las¬ 
sen, indem man folgende 
Basic-Zeilen ergänzt bzw. ein- 
fugt: 

10010 MEMORY $9FFF: MODE 2: INK 
0.13.TNK 1,0:BORDER 3. DEFINT a- 
r:z$=“ 

ON ERROR GOTO 12000 
12000 

12010 'Error - Behandlung - Routine 
12020 

'w«»**»»*»»twtt***»**m***** 

12030 IF ERR—32 AND DERR=144 
THEN POKE qpc, lz:PRINT“Falscher 
Filename": INPUT"Restart (j/n): “;a$:IF 
LOWER$(a$)=“j“ THEN RUN ELSE 
END 

Nun erscheint bei falschen Fi¬ 
lenamen die Fehlermeldung 
»Falscher Filename« und das 
Programm fragt, ob man den 
Z80-Assembler neu starten 
will oder nicht. 


Tip Nr. 4 

Eine kleine Ergänzung zu Zeile 
11450 macht es möglich, ohne 
die Eingabe des Basic-Befehls 
»RUN« den ZBO-Assembler 
neu zu starten: 

11450 IN PUT"Aufzeichnung (j/n):"; 
a$:IFLOWER$(a$)< > "j" THEN IN¬ 
PUT" Restart (j/n): “;a$:IF LOWER$ 
(a$) = “j “ THEN RUN ELSE END 

Jonny Rauscher 
Saal/Donau 


Stellungnahme 
zum Problem 
Wörlein./. 
unbekannt 

Als Entwickler des TELE- 
PORT-Systemes finden wir es 
natürlich schade, daß von ir¬ 
gendeiner Seite unsere immer 
noch einzigartige Steuerung 
über den Joystick-Port derart 
in Frage gestellt wird. Immer¬ 
hin haben sämtliche Fachma¬ 
gazine diesem System eine 
gute Zuverlässigkeit attestiert 
(u.a. auch CPC-Intemational, 
Ausgabe 12/85 oder 1/86). Es 
würde mich auch wundern, 
wenn weit mehr als 1500 CPC- 
Anwender DM 400, — einfach 
so ausgeben, und sich an¬ 
schließend nicht beschweren, 
wenn nicht einmal die Grund¬ 
funktionen funktionieren wür¬ 
den. 

ln zahlreichen Gesprächen mit 
Kunden kamen die folgenden 
Fehlermöglichkeiten zu Tage: 
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1. Die Stromversorgung des 
Akkustikkopplers ist unzurei¬ 
chend (z.B. leere Batterien, 
falsch dimensioniertes Netz¬ 
teil). 

2. Die Verbindung zu der 5V 
Leitung des CPC wurde nicht 
korrekt hergestellt. 

3. Es wurden die falschen Pa¬ 
rameter benutzt. Für Mailbo¬ 
xen, die nicht mit dem CR und 
LF gefahren werden dürfen, 
liegt das Listingfur ein Anpas¬ 
sungsprogramm jeder Liefe¬ 
rung bei. 

4. Die CPC-Konfiguration ent¬ 
hält ein Produkt der Fa. Vor¬ 
tex. In diesem Fall ist ein Be¬ 
trieb nicht möglich. 

5. Häufig werden sog. »Mail¬ 
boxen mit Handbetrieb« ange¬ 
sprochen. Mit diesen ist fast 
ausschließlich im Ortsnetz ein 
Betrieb möglich, da diese 
hauptsächlich mit akkustisch 
gekoppelten Modems arbei¬ 
ten, die keinen vernünftigen 
Trägerbieten. Bei dem vorlie¬ 
gendem Fall scheint dies der 
Fall zu sein, da der “SYSOB “ 
(?) sein Hörer aus dem Modem 
»gerissen« hat. Bei einem Ver¬ 
such mit einem seriösen Mail¬ 
box (WDR-Computerclub, TE- 
DAS, etc.) treten derartige 
Fehler sicherlich nicht auf. 

Wir möchten allerdings noch 
anmerken, daß wir für das 
Verhalten des Kunden nicht 
besonders viel Verständnis 
aufbringen können, da der 
Kunde 

1. sich nicht zuerst mit uns in 
Verbindung gesetzt hat, und so 
anscheinend lieber Rufmord 
begehen, als in den Besitz ei¬ 
nes intakten DFÜ-Systems 
kommen möchte. 

2. zur Stützung seiner Aussa¬ 
ge Phrasen verwendet, die 
überhaupt nicht belegt werden 


können (»Diese Lösung ist 
zwar schon lange umstrit¬ 
ten...«). 

Mit freundlichen Grüßen 

WÖRLEIN GMBH & CO. KG 
gez. Walter Beiersdorfer 

Sehr geehrte 
Leser, 

durch einen Kopierfehler sind 
beide Seiten der Databox Kas¬ 
sette 3/87 identisch. Die feh¬ 
lenden 4 Programme werden 
auf der Databox Kassette 4/87 
erscheinen. 

Mit freundlichen Grüßen 
DMV — Daten & Medien 
Verlagsgesellschaft mbH 


Amstrad/vortex- 

RS232-Schnitt- 

stelle 

Ich habe zu meinem CPC 6128 
eine Original AMSTRAD- 
RS232-Schnittsteile. Die bei¬ 
gefügte Dokumentation be¬ 
schreibt zwar das Program¬ 
mieren der Schnittstelle zu Ba¬ 
sic aus und unter CP/M. Es 
bleiben aber viele Fragen offen 
(z.B. die Programmierung der 
Schnittstelle aus Maschinen¬ 
ebene). Wer weiß Rat, bzw. hat 
weiterjuhrende Unterlagen. 
Da die VORTEX-RS232- 
Schnittstelle weitgehend kom¬ 
patibel sein soll, würden viel¬ 
leicht auch Unterlagen über 
diese Schnittstelle weiter¬ 
helfen. 

Ich suche auch ein Terminal¬ 
programm, das diese Schnitt¬ 
stelle unterstütz’X, bzw. sich an¬ 
passen läßt. Es sollte mög¬ 
lichst Upload, Download (auf 
Floppy und Drucker) möglich 
sein, vielleicht auch mit geteil¬ 
tem Bildschirm etc. 

Welcher Leser kann hier wei¬ 
terhelfen? Ich würde mich 


über eine telefonische oder 
schriftliche Kontaktaufnahme 
sehr freuen. 

Klaus Kleffel 
Seeweg 60 
8706 Höchberg 
Tel. (0931)49200 


Kalligraphie 
mit Joyce 

Kein Wunder, daß aufAlbrecht 
Dürers Werken nirgendwo eine 
Meldung »Drive is A:« er¬ 
scheint. 

Auch er wußte wohl bereits, 
daß unter LOGO mit der Ein¬ 
gabe: 

2t type word char 27“0 

sich die Meldung des Laufwer¬ 
kes unterdrücken läßt. (Aus¬ 
schalten der Statuszeile durch 
ESC 0 bzw. wieder Einschalten 
durch ESC 1). 

Günter Weidlich 
4410 Warendorf 1 

Checksummer 
für Joyce 

Einige kurze Hinweise z.um 
CHECKSUMMER: 

Das Programm erkennt nur 
das eingegebene Remark- 
Zeichen. Diesem Zeichen muß 
außerdem im Programmtext 
ein Leerzeichen folgen. In Ba¬ 
sic also entweder »REM« (in 
Großbuchstaben!) oder »’«. 
Andernfalls fließt der Text hin¬ 
ter dem Remarkzeichen mit in 
die Prüfsumme ein. 

Wichtig wäre auch ein Hinweis 
an die Leser, daß die durch 
den CHECKS UMMER in den 
Programmtext bei aufeinan¬ 
derfolgenden Leerstellen auto¬ 
matisch eingefügten Punkte 
(...) nicht mit eingegeben wer¬ 
den dürfen. 

Hans Joachim Meyer 
3207 Harsum 


GEBR. NICKELSEN + PARTNER 
Daten- und Kommunikationstechnik 
7407 Rottenburg 1 - Graf-Wolfegg-Straße 75 

Telefon 0 74 72 / 220 01-03 


LAPINE Titan 20 MB 

820,- 

LAPINE Titan 30 MB RLL 

890,- 

LAPINE 20 MB 

incl. Controller OMTI/SMS 

1.198- 

LAPINE 30 MB 

incl. Controller OMTI/SMS 

1.298,- 

LAPINE 40 MB incl. Controller 

1.895,- 

LAPINE 20 MB Drivecard 

1.265,- 

LAPINE 30 MB Drivecard 

1,395,- 

Controller OMTI/SMS 5527 RLL 

498,- 

MEMTEC Streamer 20 MB. intern 

1.698,- 

MEMTEC Streamer 20 MB. extern 

1.998,- 

MEMTEC Kassetten, 25 MB 

54,- 

BTX - Erweiterungskarte 

1.280,- 

SCHNEIDER PC 1512 MM/SD 

1.999,- 

SCHNEIDER PC 1512 MM/DD 

2.499,- 

SCHNEIDER PC 1512 CM/SD 

2.499,- 

SCHNEIDER PC 1512 CM/DD 

2 999,- 

SCHNEIDER PC 1512 MM/20 MB 

3.398,- 

SCHNEIDER PC 1512 MM/30 MB 

3.498,- 

SCHNEIDER PC 1512 CM/20 MB 

3.898,- 

SCHNEIDER PC 1512 CM/30 MB 

3.998,- 

Multitech POPULÄR 


(256 KB, MS-DOS) ab 1.799,- 

Multitech ACCEL-AT 


(10 MHz) ab 4.900,- 

- Händleranfragen erwünscht 

- 


PROFISOFTWARE auf 3" Disketten 


Für JOYCE PCW 

ADRESS-CONTROL 79,- DM 

600 Adressen nach 9 Feldern superschnell sortier 
bar, Eiikellend'uck. Serienbriefe, div. Schriftarien 

FAKTURA-STANDARD 94,- DM 

Rfichiung/Gutschrift/LieterscheinfAuftragsbest 
Kundendatei Kompatibel zu ADRESS-CONTROL, 
Rabaü'M.vSI Wahrung h ei wahlbat und gespeichert 
Kopf-, Fuß, Wertmlexle, Texte in Rechnungszeilen, 

FAKTURA-CONTROL PLUS 139,- DM 

Aütcm Aobuchen aus Artikeldatei, Mindestbestanas 
kontrolle, Permanente Inventur, Aulom Mahnpro¬ 
gramm, Offene Posten, 500 Kunden, 700 Artikel, 
2000 Rechn 

SPORT-TABELLEN 65,- DM 

Mil mehreren Statistiken 

Für Joyce und CPC 6128 
BAUFINANZIERUNG II 279,- DM 

Neues Sleoerrechl, Ein und MehrfamiLennauser, Hyoo 
Iheken, Bausparverlr., Lebersvers, Zwischenbilanz 

IMMOBILIENVERMITTLUNGS DATE1149,- DM 

Schnelles Suchen, Angebotsdrucke mit Nachweis 

Für CPC 464 

BAUFINANZIERUNG 189,- DM 

FAKTURIERUNG 79,- DM 

Für CPC 464, 664, 6128 
SECURANCE 149,- DM 

Verwalte! Vfersicherungsbestand und künden 

L&G - Manager 149,-DM 

Lohn und Gehalt bis 35 {50 mit 6128) Mitarbeiter. 

TextMan Textverarbeitung 98,- DM 
minlAktien 30 Aktien m. Grafik 49,- DM 

3“ CF2 Leerdisk 1 Stck/10 Stck 

Panasonic 950/89,- DM 

No Name 7,95/75,-DM 

Solange der Vbrral reicht! 

Vaisand per NN zinOgllch 0M 5,- Pwlo/Vtrp 


Hashagen * EDU 

Tel. (0 60 73)6 19 93 
Eckstr. 11,6113 Babenhausen 3 


4’87 PC 9 


i 














I—Schneider Aktuell 


PC 1512* 
Erweiterung 
auf 640 KB 

Für DM 184,— rüstet die Fa. 
Extend den Schneider PC 
von 512 KB auf 640 KB um. 
Im Preis enthalten ist alles, 
was dafür notwendig ist. Die 
Firma sagt schnellstmögliche 
Bearbeitung zu. 

Info: 

Firma Extend 

6072 Dreieich □ 


Neue 

GFA-Produkte 

Zwei neue Programme für 
den PC 1512 kommen jetzt 
von GFA-Systemtechnik. 
GFA-Desk ist ein bediener¬ 
freundliches und schnell zu 
verstehendes Programmpa¬ 
ket, das aus einer leistungsfä¬ 
higen Adressverwaltung mit 
integrierter Textverarbeitung 
besteht. Die Möglichkeit der 
Serienbrieferstellung wird 
ebenfalls gegeben (Preis ca. 
DM99,-). 

GFA-Fakt (DM 149,-) ist ein 
komfortables Fakturierungs¬ 
programm mit integrierter 
Lagerverwaltung, Adressver¬ 
waltung und Textverarbei¬ 
tung mit Serienbrieferstel¬ 
lung. Beide Produkte über¬ 
zeugen durch einfache Bedie¬ 
nung bei großer Leistungs¬ 
fähigkeit sowie ein gutes 
Preis-/Leistungsverhältnis. 

Info: 

GFA-Systemtechnik 
4000 Düsseldorf 11 □ 


Software 
im Eprom 

Das 64K »Fixed Extension 
Memory« bietet die Mög¬ 
lichkeit, eigene Software als 
Betriebssystemerweiterung 


zu nutzen. Die Programme 
werden über RSX-Komman- 
dos aufgerafen. Nach dem 
Erwerb der Epromkarte ist 
ein Austausch der gesockel¬ 
ten Eproms möglich. Die 
Karte wird am Expansions¬ 
port des Schneider CPC an¬ 
geschlossen und erlaubt den 
Anschluß weiterer Hardwa¬ 
re. Die Programmierung der 
Eproms übernimmt auf 
Wunsch die Herstellerfirma. 

Info: 

Firma Otten/Fecht 

7800 Freiburg 

Tel.: 0761/408527 □ 


DMP 4000 

Schneider bringt einen neu¬ 
en Epson-kompatiblen Ma¬ 
trixdrucker, den DMP 4000. 
Der Drucker kann an allen 
Schneider-Modellen betrie¬ 
ben werden und kostet ca. 
DM 998,-, 

Info: 

Schneider-Fachhandel □ 


Drucker »GTI« 

Der neue Matrixdrucker 
Printstar 5425 von Nissei 
Sangyo wartet mit einer Ge¬ 
schwindigkeit von 135cps im 
Letter-Quality und etwa 330 
cps im »High-Speed«-Modus 
auf. Damit dürfte der Print¬ 
star einer der schnellsten 
Matrixdrucker auf dem 
Markt sein. Der Drucker 
bietet einen Pufferspeicher 
bis zu 42k sowie eine seriel¬ 
le und parallele Schnittstelle 
und ermöglicht durch seinen 
24-Nadel-Kopf eine große 
Vielfalt an Schrift- und 
Druckarten. 

Info: 

Nissei Sangyo 

8000 München 50 □ 


Matrixdrucker 

SD24 

Der SD24 Matrixdrucker hat 
einen 24-Nadel-Druckkopf 
und bietet ein hervorragendes 
Schriftbild. Der von Schnei¬ 
der Data angebotene Drucker 
kostet ca. DM 1298,— und 
beinhaltet Traktor sowie hal¬ 
bautomatische Einzelblattzu¬ 
führung. Ein separater Ein¬ 
zelblattaufsatz wird für 
DM399,— angeboten. 

Info: 

Schneider-Data 

8050 Freising □ 


PC mit FTZ.Nr. 

Wie die Firma Schneider 
mitteilt, hat der PC 1512 die 
Zulassungsprüfung für die 
serielle Schnittstelle bestan¬ 
den. Mit dieser Zulassung 
(FTZ-Nr.) ist es nun erlaubt, 
den PC direkt an ein Modem 
anzuschließen. Die Zulas¬ 
sung erstreckt sich auf das 
Fernsprechnetz (für Mailbox 
o.ä.) und auf Datex-P20. 


PC- 

Sprachausgabe 

Mit der Audiocard 300 ist 
nun auch die Sprachausgabe 
mit dem PC zu realisieren. 
Die Audiocard kann als Slot- 
Karte in jeden IBM oder 
Kompatiblen eingesetzt wer¬ 
den, und kann gerade im Be¬ 
reich der Präsentation (auf 
Messen etc.) neue Möglich¬ 
keiten eröffnen. Der Preis 
liegt laut Hersteller bei ca. 
DM 1195, — 

Info: 

Speech Design 

8034 Germering □ 


COMAL-80 
für CPCS 

Eine low-cost-Version der 
Programmiersprache CO- 
MAL bietet der COMAL- 
Vertrieb D. Beiz jetzt auch für 
die Schneider-CPCs auf 3 “ - 
Diskette an. Der Preis für 
Programm und deutsches 
Handbuch beträgt 69, — DM; 
für DM 45, — ist eine Demo¬ 
diskette erhältlich. 

Info: 

COMAL-Vertrieb D. Beiz 

2270 Utersum 

Tel. 04683-500 □ 


Computer¬ 
seminare 
für PCW 8256/8512 
und PC 1512 

Der richtige Umgang mit Lo- 
coScript und Systemdisks mit 
JOYCE und die Bedienung 
von GEM und GEM-ge- 
stützter Software ist Inhalt 
von Seminaren, die jetzt (se¬ 
parat für JOYCE und PC) für 
private und geschäftliche An¬ 
wender angeboten werden. 

Info: 

elektro-egger 

8000 München 60 

Tel. 089/886711 □ 


Neuer Floppy- 
Controller 

Eine neuer Floppy-Control- 
ler für CPC 464 wird dem¬ 
nächst erhältlich sein. 

Nach Aussage der Lieferfir¬ 
ma soll der Controller voll 
kompatibel zu AMS-DOS 
sowie Vortex sein und noch 
zusätzliche Features beinhal¬ 
ten. Preise und Liefertermi¬ 
ne standen bei Redaktions¬ 
schluß noch nicht fest. 

Info: 

Fa. Dobbertin 
6835 Brühl 

Tel. 06202/71417 □ 
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SIREN 

Die Schneider-Utilities 


DISCOVERY PLUS 

Einzigartiger Tape to Disc Transfer 

4 Transferprogramme für normale, headerlose, 
Speedlock u Turboload-Programme. Kopiert von 
Kassette auf Diskette, auch „Problemfälle"! 

AA schrieb: „Probobly the best tope to disc copier“. 

464/664/6128 3"-Disk, nur DM 59.90 
DISCUS: DlSCovery User Service 185 Transfer¬ 
problemlösungen in DISCUS I, 2, 3 u. 4. 

Pro DISCUS DM 5.-, seperate Bestellung +DM1.- 
DISCOVERY PLUS - UPDATE (TD1)! Original + DM 10.- 
einsenden. Das alte DISCOVERY (ohne PLUS) 

+ DM 35- 

HANDY MAN 416 k 

416 k auf 3''-Diskette!!! 

60 k mehr auf jeder Diskette Superschnelles Forma¬ 
tierprogramm f. alle Formate plus SUPERMAT 202 k 
u. SUPERMAT 208 k. Neue Formate voll softwareun¬ 
terstützt. SUPERMAT läuft auch unter CP/M. Wahl¬ 
frei im Erst- oder Zweitlaufwerk. MENU MAKER Dis¬ 
kettenstartprogramm DISCSEARCH, FILESEARCH 
(Editorfunktion, String-Textsuche etc.) für alle For¬ 
mate. Superschneller Backup von Diskette auf Kas¬ 
sette. 7 Programme! 

Ein Wahnsinnspaketl (CPC-Magazin 2.87, S. 20) 

für CPC 464/664/6128 3"-Diskette nur DM 59.90 

MASTERDISC 

Disketten-Utililles Transfer, Editor Backup etc. 

Backup von Ihren Disketten, auch unformatierte Spu¬ 
ren usw Gelöschte Files retten. Alle Directory-Ein¬ 
träge editieren und verändern Fast-Formatter, File- 
Copy, Sektor-Editor usw., Insges. 12 Super-Utilitiesl! 

Für CPC 464/664/6128 3"-Diskefte nur DM 59.90 

TWO ON ONE PACK 

MASTERDISC und HANDY MAN auf einer 3"-Diskette 
DM99.- 

DISC-MATE 

CP/M PLUS UTILITIES für den JOYCE 

Gelöschte Files retten und vor dem Löschen schüt¬ 
zen Files verstecken/sichtbar machen. DIRectory- 
Editor Sehr komfortables und schnelles Kopierpro¬ 
gramm, ideal für den schnellen Backup wichtiger 
Daten Laufwerks-Speedup um 20%. Ein Muß für 
den JOYCE-User 

Für JOYCE, JOYCE plus 3"-Disket!e nur DM 59.90 

3 "-Zweitlaufwerk AMDRIVE 

Für alle CPC's incl. Netzteil Qualitätslaufwerk in 
massivem Aluminiumgehäuse (3 mm stark) farblich 
passend zum CPC. Paßt in der Größe auf das Erst¬ 
laufwerk. Voll kompatibel. Preis incl Anschlußkabel. 

Bei Bestellung bitte CPC-Typ angeben. 

Zum Hammerpreis von DM 333.- + DM 8.- Versand¬ 
kostenanteil. 

MAESTRO STEREOVERSTÄRKER 

Für alle CPC’s 

- Die perfekte Soundmaschine für Ihren CPC 

- Nutzt die Soundmöglichkeiten Ihres CPC voll aus 

- Ihre Software in totalem Stereo 

- Kein extra Anschluß notwendig 

- Komplett mit zwei 30 W-Lautsprechern, Stereo¬ 
kopfhörer und DEMO-Software 

- Beliebige HIFI-Loutsprecher anschließbar. Ein 

Muß für jeden Soundfreak DM 139.90 


ARNOR 

EPROM’s: Die Software, 
die immer da ist. 
Auf Tastendruck! 

PROTEXT 

Die Textverarbeitung auf England's CPC's 

- Supersc/ine/l und vielseitig 

- Textoperationen für alle Ansprüche (Text, Seiten, 
Kopf u. Fußzeilen etc.). Rasendschnelle Verarbei¬ 
tung 

- Große Textfiles (mit EPROM ca. 40 k) 

- Obernimmt Files anderer Textprogramme 

- 7 internationale Zeichensätze 

- Unterstützt alle Drucker 

Die engl. Zeitschrift YOUR COMPUTER schrieb: 

„The best AMSTRAD WP ot any price. ." 
Disketle/ROM DM 99.90/129.90 
PROTEXT JOYCE: Preis a.A. 

PR0MER6E 

Die Erweiterung für PROTEXT 

Baut die hervorragenden Features von PROTEXT 
weiter aus. 

- Leichtverständliches Matlmerge 

- Automatisches Neu- und Umformatieren 

- Selektives Drucken (z.B. blockweise) 

- ROM-Version editiert zwei Files gleichzeitig, ko¬ 
piert Files ineinander (auch selektiv) 

- Background Printing 

- Mehrspaltiges Layout 

- Dezimalkalkulator etc. etc. etc. 

Diskette/EPROM DM 89.90/119.90 

UTOPIA 

Spitzenutifities 

- Graphics Screen Dump ‘ auf Drucker (jede Farbe 
in anderer Schattierung) 

- Kompletter Disketten-Sektor-Editor 

- Eine ganze Stange Utilities in der Art Ihrer CPM- 
Progromme, jedoch sofort verfügbar (Kopieren, 
Löschen, Umbenennen etc.) 

- BASIC Programmierhilfen wie FIND & REPLACE. 

- Mehr als 45 neue Befehle in einem EPROM. 

Die Zeitschrift AMSCLUß schreibt: „UTOPIA is by far 
the best Utilities Rom ... It's worth buying a rom 
board just to plug it in". 

EPROM DM99.90 

MAXAM 

Der Klassiker 

- Superschneller Assembler/Disassembler 

- Mischt MC-Code mit BASIC 

- Kompletter Monitor und Full Screen Speicher¬ 
editor etc. 

Die Zeitschrift ELECTRONICS & COMPUTING 
schrieb: „This piece of Software shauld be held up as 
an example of what can be done by programmers 
who care. It is brilliant!..." 

Diskette/Eprom DM 99.90/129.90 

MODEL UNIVERSE 

Dreidimensionales Zeichen-System 

- Entwerfen Sie Ihr eigenes Design in drei Dimen¬ 
sionen, so einfach wie mit herkömmlichen Syste¬ 
men 

- Entwürfe/Körper voll um alle Achsen drehbar 

- Blickrichtung und Perspektive wählbar 

- ZOOM: Betrachten Sie Ihren Entwurf 'von Innen 1 

- Entwürfe speichern (Disk./Kass.) 

- Screendump/Ausdruck auf jedem EPSON-kom- 
patiblen Drucker (incl. Schneider-Drucker) 

- Unter Nutzung aller 27 Farben bestehen un¬ 
geahnte Grafik-Möglichkeiten 

Diskette DM 79.90 

ROMBO 

EPROM-Karte zur Aufnahme von 6 EPROM’s 
DM 99.90 (Adapter f. CPC 6128 DM 30.- 

3"-Disketten (Maxeii) 

Original 1. Qualität! 

10 Stück DM 74.- 


Britannia Romboard SUPER ROMPLUS 

EPROM-Karte für 14 ROM’s (Eproms) am CPC 

- Komplett mit Auto-ROM-Control-System 
(A R C.S) für ROM-Auswahl 

- Verwaltet 14 ROMs auf allen CPC s (ehrlich!) 

- Start-Up Menü für leichte ROM-Auswahl 

- Akzeptiert 16 k Sideway RAM Module 

- 80 Zeichen Modus auf Tastendruck 

- Durchgeführter Erweiterungsbus 

- Das Ganze in einem GESCHLOSSENEN Gehäuse 
DM 149.90, (Adapter f. CPC 6128 DM 30.-) 

Britannia PHASOR ONE Joystick 

Der Joystick mit Griff, völlig neues Design 

- FIRE-Button im Griff 

- Pistolgrip-Design 

- Präzise Microschalter 

- Ultra Sensitive Control Lever 
für schnelle Reaktionen 

- Extra langes Kabel 

- Stahlschaft kugelgelagert 
DM 49.90 

DART-Lightpen 

Der Lightpen, der wirklich funktioniert 

- In modernster Lichtleitfasertechnik 

- Perfektes Zeichenprogramm, menügesteuert 

- FILL, UNFILL, TEXT, BOX, ROTATE etc. 

- MODE 0, 1 u. 2. Alle 64000 Pixel erreichbar 

- Komplett mit Interface und Software 

- Durchgeführter Erweiterungsbus 
DM 119.90, (CPC 6128 Adapter DM 30.-) 

SUPERCOPY 

Universal-Disketten-Kopierprogramm (BACKUP!) 

Kopierprogramm mit Erfolgsgarantie und SuperSer¬ 
vice: Sollte das Programm bei einem Kopierschutz 
versagen, bieten die Hersteller gegen Einsenden des 
Programms einen kostenlosen Update, der den 
neuen Kopierschutz erkennt. 

3"-Diskette DM 79.- 



SPIELE: 


ACE 

ACRO-JET 
ALIENS 

AMERICA'S CUP CHALLENGE 
BACTRON 
DONKEYKONG 
DRUID 
FIRELORD 
GAUNTLET 
HOWARD THE DUCK 
IKARI WARRIORS 
KONAMI'S COIN UP HITS 
LEGEND OF KAGE 
SCOOBYD OO 
SHORT CIRCUIT 
SILENT SERVICE (DAS U-BOOT) 

SPACE HARRIER 
STREET MACHINE 
THEY SOLD A MILLION III 
TENTH (I0TH) FRAME 
TOP GUN 
TRAILBLAZER 

TRIVIAL PERSUIT (DEUTSCH) 

WEST BANK 
XENO 

Liste für weitere brandheiße Titel zu Superpreisen 
(auch JOYCE und PC) anfordern! 


Händleranfragen erwünscht! 

PR8-SOFT 
Klaus-M. Pracht 
Erbachshof 1 
D-8702 Eisingen 


KASS./DISK. 

32 -145 - 
32 -145 - 
37 ~/45 - 
29 ~/45 - 
35 -147 - 
29 -145 - 
29 -145 - 
29 -/39 - 
32 ~/45 - 
32 -147 - 
29 -/39 - 
32 -14 5 - 
32 -/45 - 
29 -145 - 
29 -739 - 
34 -747 - 
32 -145 - 
32 -745 - 
32 -745 - 
32 -745 - 
32 -745 - 
29 -745 - 
37-749- 
19-729- 
29 -7a A 






I Bericht 


Der cpc 
im Einsatz 


Um Ihnen wieder einmal zu demon¬ 
strieren, welch findige Anwendun¬ 
gen unsere Leser für ihren CPC zu 
Tage bringen, haben wir uns zwei 
nicht ganz alltägliche Beispiele her¬ 
ausgesucht, die wir Ihnen im folgen¬ 
den einmal näher erläutern wollen. 


Race-Timer 


Das Programm Race-Timer deckt ei¬ 
nen ganz besonders interessanten An¬ 
wendungsbereich eines Computers ab. 
Programmautor Dipl.-Ing. Reiner 
Medgenberg charakterisiert sein Pro¬ 
gramm folgendermaßen: »Race-Timer 
dient der menuegeführten Zeitmessung 
bei Rennsportveranstaltungen mit Ein¬ 
zelläufen für bis zu 99 Teilnehmern 
mit je zwei Trainings- und je drei Wer¬ 
tungsläufen.« 

Das Außergewöhnliche an dieser An¬ 
wendung ist das Zusammenspiel von 
Soft- und Hardware, letztere ist für die 
Zeitmessung von besonderer Bedeu¬ 
tung. Somit lassen sich zahlreiche An¬ 
wendungen für Race-Timer aufzählen, 
bei denen die Zeitmessung mit Hilfe 
des CPC vorgenommen werden kann. 
Das Programm wurde auf einem CPC 
6128 entwickelt und kann bei Renn¬ 
sportveranstaltungen mit Einzelläufen, 
wie zum Beispiel Minicar-Rennen, 
Fahrradsprint und Zeitnahme bei 
Rallye-Sonderprüfungen zum Einsatz 
gelangen. Es ist jedoch der Phantasie 
des Anwenders überlassen, andere 
Einsatzmöglichkeiten, zum Beispiel in 
der Physik (Weg/Zeitmessung) oder 
der Biologie (wie lange braucht mein 
Hamster für 100 Meter Sprint?) zu fin¬ 
den. Die Idee zu Race-Timer ent¬ 
stammt jedenfalls aus dem Rennsport. 
Das Programm entstand bereits im Ju¬ 
ni 1986, als ein Arbeitskollege von 
Reiner Medgenberg ihn bat, mit sei¬ 
nem Schneider CPC 6128 die Zeit¬ 
messung für das erste europäische 
Championat der alternativen, mit 
Muskelkraft betriebenen Fahrmobile 
durchzuführen. 





Bild I: Da CPC 6128 im hinxaiz. Zminuwswii; und Prohikolliannt'-du li ninntdiutm n-iiuj 
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Hardware zum Betrieb von 'RACE-TIMER': 


Uebersichts-Schaltplan 

Lichtschranke 
fuer 'START' 

Reflektor fuer 
Lichtschranke 


f ___ # 


• — 1 

Netzteil 

! ! 

i |- 


am Start 

! PS 1 !- 

-! LS 1 ! 

! R! 


! ! 

! ! <- 

-111 



% 0 

« / 



! 

i 

! 



! I 

• ! Relais 

mit potential- 


! ! 

—! REL1 ! freiem 

Kontakt 'START' 

Joystick- 

! CPC ! 

"-' 


Anschluss 

! !- 

»-. 


des CPC 

! 6128 ! 

! ! Relais 

mit potential- 


t i 

! ! 

—! REL2 ! freiem 

! ! 

! 

Kontakt 'ZIEL' 



! 

• — t 

Netzteil 

! ! 

i i- 


am Ziel 

! PS 2 !- 

-! LS 2 ! 

! R! 


1 ! 

! ! <- 

Lichtschranke 
fuer 'ZIEL' 

-! 2! 

Reflektor fuer 
Lichtschranke 

Bild 2: Hardw are zum 

Betrieb \wn Race-Timer. 



** TABELLE SORTIERT NACH GESAMTLAUF-ZEIT 

Wertung: Mittelwert aller 3 Laeufe 

*******************************************»»*************************»*,,*,,*,, 


STARTNUMMER: 

5 

Hans Schmidt 

ZEIT: 

8.29 

sec 

GESCKW:134.57 

km/h 

STARTNUMMER: 

6 

Erich Erikson 

ZEIT: 

CO 

sec 

GESCHW:132.23 

km/h 

STARTNUMMER: 

1 

Otto Meier 

ZEIT: 

8.53 

sec 

GESCHW:130.78 

km/h 

STARTNUMMER: 

3 

Kurt Haenchen 

ZEIT: 

8.65 

sec 

GESCHW1128.9 7 

km/h 

STARTNUMMER: 

e 

Betty Brown 

ZEIT: 

8.69 

sec 

GESCHW:128.37 

km/h 

STARTNUMMER: 

7 

Charli Brown 

ZEIT: 

8.82 

sec 

GESCHW:126.53 

km/h 

STARTNUMMER: 

2 

Hane Haenschen 

ZEIT: 

9.16 

sec 

GESCHW:121.83 

km/h 

STARTNUMMER: 

9 

Lars Larson 

ZEIT: 

9.65 

sec 

GESCHW:115.61 

km/h 

STARTNUMMER: 

4 

Teddy Brown 

ZEIT: 

9.65 

sec 

GESCHW:115.61 

km/h 


Bihl 3: Mehrere Sorüerfimktionen stehen hei Race-Timer zur Auswahl Unser Bild zeigt die Tabelle nach Gesamtlaufzeit. 

660 

PRINT "s "jUSING "##":enum; 


670 

PRINT " "jenamS;" " 



680 

PEN 1: PAPER 0 



690 

PRINT 



700 

PRINT - Hintergrund 

>V-"ordargrund >B<order" 


710 

f$=INKEY$: IF f$="" THEN GOTO 710 


720 

IF f$="b" THEN bo=bo+l: 

BORDER bo: IF bo>26 THEN bo=0: 

BORDER bo 

730 

IF f S*="h" THEN pa=pa+l: 

INK 0,pa: IF pa>26 THEN pa=0: 

INK 0,pa 

740 

IF fs="v" THEN pe=pe+l: 

INK l.pe: IF pe>26 THEN pe=0: 

INK 1,pe 

750 

f=INSTR("012345678eEaA" 

,f$) 


760 

IF f=0 THEN GOTO 710 



770 

ON f GOSUB 3220.790,1010,1360.2030,2340,2650,3860,4650 

4810,4810,5100,5100 

780 

790 

800 

GOTO 400 



CLS 



810 

PRINT "********«******* 

************************ 


820 

PRINT 

* * * 


830 

PRINT "** SORTIEREN 

NACH STARTNUMMERN **" 


840 

PRINT "** 

* * n 


850 

PRINT «♦■******»»******» 

************************ 


860 

PRINT 



870 

PRINT 



880 

PRINT * Sortieren 7 (J/N)" 



Bild 4: Auszug aus dem Lisiing “Race-Timer“. 


Das Programm wurde rechtzeitig fer¬ 
tiggestellt und hatte am 14.06.1986 
den ersten Einsatz zu bewältigen. 

O.g. Veranstaltung wurde vom Mo¬ 
torsportclub Nuembrecht mit Teilneh¬ 
mern aus vielen Ländern durchgeführt 
und u.a. auch vom Fernsehen übertra¬ 
gen. Race-Timer überzeugte spontan 
und erwies sich in der Anwendung als 
sehr sicher und in der Bedienung als 
sehr komfortabel. 

Für Interessierte sei bemerkt, daß das 
schnellste Fahrmobil eine Durch¬ 
schnittsgeschwindigkeit von 92.31 
km/h auf der 200 Meter langen Meß- 
Strecke erreichte. 

Im Juli des Jahres wurde das Pro¬ 
gramm erneut eingesetzt, als der 
MSC-Nuembrecht ein Minicar- 
Rennen veranstaltete und es sind wei¬ 
tere Veranstaltungen zu erwarten, die 
den Einsatz von Race-Timer ermög¬ 
lichen. 

So waren denn Programmautor sowie 
Veranstalter von der Leistungsfähig¬ 
keit von Race-Timer und des CPC voll 
überzeugt, beide Veranstaltungen wur¬ 
den ohne Probleme gemeistert. 

Sollte der eine oder andere CPC- 
Besitzer an diesem Programm inter¬ 
essiert sein, so kann er sich über den 
Verlag mit Reiner Medgenberg in 
Verbindung setzen. Er wird allen In¬ 
teressierten mit Rat und Tat zur Seite 
stehen. 

Abschließend noch einmal eine kurze 
Übersicht aller Funktionen von Race- 
Timer, die noch einmal die enorme 
Leistung des CPC’s und des Pro¬ 
grammautors zeigen: 

— Zeitmessung durch entsprechen¬ 
den Hardware-Aufbau (s. Bild 2). 

— verwalten von bis zu 99 Teilneh¬ 
mern mit Bemerkungen, 2 
Trainings- und 3 Wertungsläufe 

— 3 Auswertungsalgorithmen und 
mehrere Sortierkriterien 

— ermitteln der Durchschnittsge¬ 
schwindigkeit und Protokoll auf 
Bildschirm und Drucker 

— Lade- und Speicherfunktionen 

— beliebiges Einstellen der 
Teilnehmer- und Streckendaten 

— Ausgabe von Teilnehmer- und 
Wertungslisten 
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Bild 5: Ernst Bernhauer bei der Auswertung der Spielberichte an seinem CPC. 


»Böse Buben« 
haben keine Chance 


Wenn am späten Abend laute Anfeue- 
rangsrufe aus der Eissporthalle Kauf¬ 
beuren zu hören sind, der Kampf um 
Bundesligapunkte jedoch schon been¬ 
det ist, dann findet dort sicher ein Spiel 
um den ESVK-Sparkassen-Hobby- 
pokal statt. Auf der Eisfläche, die 
sonst nur den Bundesligastars des ESV 
Kaufbeuren Vorbehalten ist, gehen 
Freizeitsportler ihrem Eishockeyspiel 
nach. 

Seit nunmehr 18 Jahren gibt es diese 
Pokalrunde. Heuer nehmen acht 
Mannschaften teil, deren Spieler über 
50.000, — DM aus eigener Tasche auf¬ 
bringen müssen, um die Eiszeiten für 
Training und Spiele zu finanzieren. 

Einen kleinen Zuschuß zu ihren Auf¬ 
wendungen erhalten sie von einheimi¬ 
schen Lokalen und Firmen, deren 
Namen sie tragen; so heißen sie Piz¬ 
zeria Grizzly, EC Mooshütte, Feger 
Am Kamin etc. 

Obwohl die Spieler selbst tief in die 
Tasche greifen müssen, haben sie den 
Spaß an ihrem Sport nicht verloren. 
Die Abwicklung des Spielbetriebs 
(Zeitnahme, Schiedsrichter,...) wird 
durch viele freiwillige und ehrenamt¬ 
liche Helfer unterstützt. So auch die 
Auswertung der Spielberichte. Diese 
erforderte bislang viel Zeiteinsatz und 
Rechenarbeit, müssen doch sämtliche 
Ergebnislisten, Rangfolgetabellen, 
Strafzeiten-, Torschützen- und Scorer- 
listen (für jedes erzielte Tor und jeden 
Paß gibt es einen Punkt, diese Punkte 
ergeben die Scores) per Hand erstellt 
werden. 

Unserem Leser Ernst Bernauer kam 
an einem Sommertag beim Baden die 
Idee, seinen neu erworbenen Compu¬ 
ter CPC 6128 für diese Aufgabe zu 
verwenden. Emst Bemhauer überlegte 
sich zunächst, wie das Gerät am be¬ 
sten für diese Anwendung herangezo¬ 
gen werden konnte und blätterte erst 
einmal die PC-International-Zeit- 
schriften durch, um evtl, ein geeigne¬ 
tes Listing zu finden. 

Dazu Herr Bemhauer: »Große Hilfe 
bei der Erstellung der Rangtabellen 
leistete mir das Programm »LIGA« 


von Gerd Brinkmann aus dem CPC- 
Sonderheft 1/86. Ich arbeitete einige 
Zeilen nach meinen Bedürfnissen um 
und hatte das ideale Sporttabellenpro¬ 
gramm zur Hand. Gleichzeitig konn¬ 
te ich sämtliche Ergebnisse ausdruk- 
ken. Die Probeläufe in den nächsten 
Tagen klappten einwandfrei, der große 
Einsatz sollte aber erst folgen.« 

Als nächstes mußte überlegt werden, 
wie die aus den Spielberichten zu ent¬ 
nehmenden Daten über Torschützen, 
Assistenten und »böse Buben« (Straf¬ 
zeiten) am besten erfaßt und am 
schnellsten verwaltet werden konnten. 

Als ideal erschien hier das Programm 
dBase II, das dem Autor von seiner 
schulischen Ausbildung her bekannt 
war. Das Buch dBase II für den 
Schneider CPC« von Dr. Albrecht 
stand hier erfolgreich zur Seite und 
nach etlichen Probeläufen mit fiktiven 
Daten stand das Gerippe für den Tag 
X. 

Emst Bemhauer hatte Dateistrukturen 
für eine Mannschaftsliste sowie die 
Stamm- und Änderungsdatei erstellt. 
Es war jedoch noch eine lange War¬ 
tezeit mit manchen Zweifeln an der 
Richtigkeit seines Schaffens zu über¬ 
stehen. 

Dann, Ende September 1986, war es 
endlich soweit. Der erste große Au¬ 
genblick der Bewährung war gekom¬ 
men. Nach einer Mannschaftssitzung, 
bei der Modalitäten der Runde 86/87 


festgelegt wurden, bekam Ernst Ber- 
hauer die Teilnehmerlisten der acht 
Mannschaften und konnte darangehen, 
das leere Gerippe mit Fleisch zu fül¬ 
len und die ersten offiziellen Mann¬ 
schaftslisten auszudrucken. 

Der große Tag war dann der 19. Ok¬ 
tober. An diesem Tag fanden die er¬ 
sten Spiele der neuen Saison statt. 
Ernst Bemhauer bekam die ersten 
Spielberichte und konnte mit der Aus¬ 
wertung beginnen. Jetzt schlug die 
Stunde der Wahrheit. Es mußte sich 
zeigen, ob sich alle Mühen der Vor¬ 
bereitungen gelohnt hatten. 

»Ich lud das Programm dBase, eröff- 
nete mit »use b:hobyaend« meine er¬ 
ste Datei und konnte mit »append« die 
nach Paßnummem geordneten Daten 
eingeben. Jetzt mit »update from« die 
Stammdatei aktualisieren, mit »sort 
on...descending« nach den einzelnen 
gewünschten Kriterien (Tore, Pässe, 
Scores und Strafen) in absteigender 
Reihenfolge sortieren, sowie mit »In¬ 
dex on« untergliedern. Nur noch 
schnell nach den vorher erstellten 
»Report-Dateien« eine saubere Liste 
ausgedruckt. Mit Erleichterung sah ich 
die ersten Zeilen der Torschützenta- 
belle auf dem Papier.« 

Es zeigte sich schon nach den ersten 
Spielen, wie es der Computer ermög¬ 
lichte, nach jedem Spiel sofort genau 
zu wissen, welcher Spieler die Tor¬ 
schützenliste anführt, welche Mann- 
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Schaft die besten Aussichten auf den 
Gewinn des Pokals hat und wer der 
größte »Sünder« mit den meisten Straf¬ 
zeiten ist. 

Zum Schluß noch einmal Herr Bern¬ 
hauer: »Bedanken möchte ich mich bei 
allen Beteiligten, die mir geholfen ha¬ 
ben, die Runde zu bewältigen, beson¬ 
ders aber bei meiner Frau, die mir bei 
den Rückschlägen immer tröstend zur 
Seite stand.« 

Wir haben Ihnen nun zwei nicht ganz 
alltägliche Anwendungen für einen 
CPC aufgezeigt, die einerseits die viel¬ 
fältigen Einsatzbereiche eines Compu¬ 
ters aufzeigen sollen und zum anderen 
als Anregung für die Realisation eige¬ 
ner Ideen dienen sollen. Wenn auch 
Sie eine Anwendung mit Ihrem 
Schneider-Computer realisiert haben, 
und diese einer breiten Leserschaft 
einmal vorstellen möchten, schreiben 
Sie uns einfach an. Wir warten ge¬ 
spannt auf Ihre Ideen. (SR) 



Bild 6: Der Original-Spielbericht. Nicht gerade sehr übersicht¬ 
lich und aussagekräftig. _ 
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Bild 7: Diesen Ausdruck bringt E. Bemhauers Programm. 
Ordentlich und übersichtlich... 

Seitennr. OOOOl Stand am 15. Januar 1987 

15/01/87 

TORSCHÜTZENTABELLE 

Die besten Torschützen der Hobbyrunde 86/07 

fr*#****#*#***##*#****#*#***##*#**#**#***##** 

Name 

Vorname 

Mannschaft 

Spiegl 

Kar1-Hei nz 

EC Maoshütte 

Jakob 

Johann 

Rössler Metals 

Hof acker 

Alfred 

EC Hubertus Apfeltrang 

Winkler 

Werner 

EC Mooshütte 

Bayer 

Günther 

SCT Glöckner 

Engel 

Manfred 

SCT Glöckner 

Götzfried 

Hermann 

Rössler Metals 

Hübner 

Manfred 

SCT Glöckner 

Bösswald 

Reiner 

EC Digital 

Kögl 

Ludwig 

EC Hubertus Apfeltrang 

Wei ss 

Hans-Peter 

Cafe Erhard 

Puschel 

Thomas 

ASV Grizzly Hirschzell 

Stankmann 

Franz 

Rössler Metals 

Augst 

Werner 

SCT Glöckner 

Mayerhanser 

Günther 

SCT Glöckner 

Dietrich 

Norbert 

EC Hubertus Apfeltrang 

Sonntag 

Berndt 

EC Mooshütte 

Stankmann 

Christian 

Rössler Metals 

Thum 

Walter 

Cafe Erhard 

Wiedemann 

Josef 

Rössler Metals 

Hecker 

Hei nz 

EC Digital 

Schol1 

Hubert 

ASV Grizzly Hirschzell 

Göttie 

Nickolai 

Die Feger Am Kamin 

Weiss 

Andreas 

EC Digital 

Scheuer 

Günter 

EC Digital 

Bichtele 

Norbert 

EC Hubertus Apfeltrang 

Bittner 

Raiaad 

Die Feger Am Kamin 

Vrbas 

Peter 

Die Feger Am Kamin 

Lill 

Joachim 

EC Mooshütte 

Mac kinnon 

Roy 

EC Digital 

Vrbas 

Jan 

Die Feger Am Kamin 

De Paly 

Thomas 

EC Digital 

Seidl 

Wolfgang 

EC Digital 

Sorg 

Paul 

EC Hubertus Apfeltrang 

Schröter 

Gerhard 

EC Digital 

Stankmann 

Wolfgang 

Rössler Metals 

Mayr 

Werner 

Rössler Metals 

Morhardt 

Hartmut 

SCT Glöckner 

Martin 

Andreas 

ASV Grizzly Hirschzell 

Satzger 

Helmut 

Die Feger Am Kamin 

Mer k 

Max 

EC Hubertus Apfeltrang 
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TURBO PROLÜG 

Hersteller: MINI SOFT 
Vertrieb: Heimprophet 

Die Sensation der diesjährigen CES 
erreichte uns letzte Woche und wur¬ 
de sofort einem Expertentest unterzo¬ 
gen. PROLÜG ist eine neue Pro¬ 
grammiersprache, welche es erstmals 
ermöglicht, künstliche Dummheit auf 
Microcomputern zu realisieren. 
Programme, die unter Turbo Prolüg 
erstellt wurden, sagen nicht nur die 
Unwahrheit, sondern lassen sich in ei¬ 
ner besonderen Dialogroutine noch auf 
Gespräche mit dem Anwender ein und 
versuchen sich durch weitere Unge¬ 
reimtheiten herauszureden bzw. den 
Anwender davon zu überzeugen, daß 
sie doch Recht haben. 

Zunächst einmal die technischen 
Daten: 

Aus Geschwindigkeitsgründen wurde 
ein Interpreter gewählt, der ungefähr 
zwanzigmal langsamer arbeitet als ein 
NLQ 401. Die Fakten werden inter¬ 
aktiv eingegeben und danach über ei¬ 
ne Lügroutine abgeändert. 

Der Schwindelfaktor läßt sich dabei 
stufenlos einstellen. Turbo Prolüg ver¬ 
rechnet sich bis auf 16 Stellen und 
verwendet eine Münchhausen-Arith¬ 
metik. 

POP-Away-Menues erleichtern den 
Umgang, und auch der gewohnte 
FULL THROTTLE Editor ist vor¬ 
handen. 

Hardware Minimalanforderungen 
sind: 

14 IBM PCs oder 150% Kompatible 
mit entsprechender Anzahl Netzwerk¬ 
karten min. 640 KB Hauptspeicher/ 
Einheit 
14 Mäuse 

2 Laserdrucker 

3 Akustikkoppler 

3 8087 Coprozessoren 
28 Diskettenlaufwerke 
1 Plattenspeicher 145 MB 
1 Cray zur VT52 Emulation 
1 BTX Anschluß 

Das mag auf den ersten Blick ein we¬ 
nig übertrieben erscheinen, wird je¬ 
doch vom automatischen Gerüchte¬ 
verbreiter benötigt. 


So arbeitet das Programm 

Der Anwender geht mit dem 
Kommando: 

LEARN FACTS 

in den Editiermodus. Dort wird in der 
speziellen Prolüg-Sprache eine Tatsa¬ 
che mehrfach (min. dreimal) unter¬ 
mauert. 

Eine typische Fallstudie, in der fest¬ 
gelegt werden soll, daß der Onkel von 
Thomas Wolfgang heißt, sähe unge¬ 
fähr so aus: 

LEARN FACTS 
? > The Uncle of Thomas is 
Wolfgang 
Fact learned #1 

? > Wolfgang is the Uncle of 
Thomas 

Fact learned #2 
?> Thomas has a Uncle 
named Wolfgang 
Fact learned # 3 
Continue y/n 

An dieser Stelle gibt der Rechner auf 
allen Druckern eine Hardcopy aus und 
fragt, ob er weitere Fakten lernen soll. 

Wir antworten in unserem Beispiel mit 
n. Der Rechner geht danach wieder 
auf Kommandoebene und wir können 
die gelernten Fakten abfragen. 

Dies geschieht mit dem recht simplen 
Befehl: 

> Compute all the learned Facts and 
give Answer about the Question “Who 
is the Uncle of Thomas ?“ by Ly in¬ 
grate 5 


Lyingrate ist ein Wert, der den Ant¬ 
wortsfaktor von Notlüge auf eidesstatt¬ 
liche Versicherung begrenzen kann. 
Bei der angegebenen Rate von 5 gibt 
der Computer folgendes aus: 

The Uncle of Thomas is WALTER 

Bei der Maximalrate von 255 gibt er 
aus: 

I dont know Thomas 

Dies gibt er auch auf allen Druckern 
aus, leitet die Meldung via Satellit an 
die Medien weiter und setzt sich so¬ 
fort mit der Anwaltskanzelei Müller, 
Müller & Müller in Verbindung, um 
das soeben noch ausgedruckte anzu¬ 
fechten. 

Die Minimallüge wäre Rate 0 und hät¬ 
te folgende Ausgabe zur Folge: 

Say I not !!! 

Danach schaltet der Rechner in den 
Dialogmodus und überzeugt den An¬ 
wender davon, daß es ihn erstens gar 
nichts angeht, wie der Onkel heißt und 
daß er es zweitens eigentlich auch gar 
nicht wissen will. Ist der Anwender 
dann immer noch nicht überzeugt, 
droht Prolüg damit, die ganze Fest¬ 
platte zu formatieren, wenn diese pein¬ 
liche Fragerei nicht aufhört. 

Fazit: 

Bis auf die bisher noch in Englisch ge¬ 
haltene Programmiersprache (eine rä¬ 
toromanische Version ist in Vorbe¬ 
reitung) stellt Turbo Prolüg einen 
ernstzunehmenden Schritt in die elek¬ 
tronische Ignoranz dar. Mit weiteren 
Laiensystemen ist in Kürze zu 
rechnen. (TM) 
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I Bericht 



Fragen über 
Fragen 

Die Schneider Computerdivision 
hat seit der Einführung der CPC- 
Serie immense Erfolge zu verbu¬ 
chen. Um diese Computer herum 
hat sich ein wahrhaft riesiger 
Markt gebildet, der durch die 
Systeme Joyce und neuerdings 
PC 1512 weiter expandieren 
wird. 

Während der Cebit’87 hatten wir 
Gelegenheit, uns mit dem Leiter 
der Schneider Computerdivision, 
Fred Köster, ausführlich zu un¬ 
terhalten. 

PC Int.: 

Die Nachfrage nach dem neuen 
Schneider PC, mit dem Schneider erst¬ 
malig in den klassischen Bereich der 
Personalcomputer mit Industriestan¬ 
dard vorgedrungen ist, scheint selbst 
die größten Optimisten überrascht zu 
haben. 

Die Folgen waren bzw. sind zum Teil 
längere Wartezeiten bei der Ausliefe¬ 
rung. Wieviel PC 1512 sind bis heute 
verkauft und wann wird eine normale 
Auslieferung möglich sein? 

F. Köster: 

Wir haben bisher etwa 55000 PC’s im 
deutschsprachigen Raum verkaufen 
können, dazu kommen rund 15000 
Geräte, die in die Benelux-Staaten ge¬ 
liefert wurden. Die Lieferzeiten haben 
sich inzwischen normalisiert. Da die 
einzelnen Modelle sich jedoch teilwei¬ 
se sehr unterschiedlich verkaufen und 
wir diese Erfahrungen erst machen 
konnten, seit wir voll lieferfähig sind, 
kann es in Einzelfällen auch heute 
noch zu Lieferfristen von drei oder 
vier Wochen kommen. 

PC Int.: 

Mit welchen Absatzzahlen rechnen Sie 
für das Jahr 1987 und wo siedeln Sie 
die Schwerpunkte bzw. die vorrangi¬ 
ge Zielgruppe des PC an? 

F. Köster: 

Zur Zeit verkaufen wir etwa 8000 — 


10000 PC’s pro Monat. Diesen Erfolg 
möchten wir zunächst einmal stabili¬ 
sieren und sehen aufgrund des guten 
Preis-/Leistungsverhältnisses und der 
großen Zuverlässigkeit der Geräte gute 
Chancen für unsere Produkte. Mo¬ 
mentan werden die PC 1512 haupt¬ 
sächlich an Klein- und Mittelbetriebe 
sowie an Homecomputer-Aufsteiger 
verkauft. Zudem sind die ersten Indu¬ 
striegeschäfte getätigt worden. 

Diese Phase dauert erfahrungsgemäß 
jedoch länger an. Zum einen werden 
die Systeme in der Industrie einer in¬ 
tensiveren Testphase unterzogen, zum 
anderen muß in der Industrie sowie im 
Handel ein Umdenken stattfinden. 

PC Int.: 

Die Preispolitik spielt hierbei eine 
übergeordnete Rolle? 

F. Köster: 

Sicher, denn ein neues Preis-/Lei- 
stungsverhältnis setzt auch im Handel 
Flexibilität voraus. Der Preis der 
Hardware allein ermöglicht nicht die 
Finanzierung der Beratung. Dienstlei¬ 
stungen wie Schulung, Einweisung 
u.ä. müssen zukünftig separat betrach¬ 
tet werden. Wir konnten kompetente 
PC-Händler gewinnen, die diesen 
Weg mit uns gehen. Das sind Händ¬ 
ler, die bisher Systeme wie z.B. Oli¬ 
vetti, IBM etc. im Angebot hatten. Im 
Bereich der Industrie ist es da schon 
etwas schwieriger. Die Verantwortli¬ 


chen müssen weg vom »Budgetden¬ 
ken« hin zum kaufmännischen 
Denken. Wir bieten ja kein schlech¬ 
teres Produkt, im Gegenteil, unsere 
Produkte sind besser und preiswerter. 
Zudem ist in der Industrie oftmals ei¬ 
ne Unsicherheit bei Computer- 
Investitionen zu verzeichnen, da dies 
kein vertrautes Gebiet für die Sachbe¬ 
arbeiter ist. 

PC Int.: 

Der neue PC wird offensichtlich mit 
einem »neuen« Marketingkonzept ver¬ 
trieben, der Fachhandel wird bewußt 
in den Vordergrund gestellt. Bedeu¬ 
tet dies langfristig gesehen, einen 
Trend »weg vom Kaufhaus- und Ver¬ 
sandhandel?« 

F. Köster: 

Die Computer-Verkäufe im Groß Ver¬ 
sand im Inland sind mit ca. 7 — 8% 
Umsatzanteil auch bisher bereits nicht 
überhöht. Zudem werden Service- und 
Dienstleistungen auch bei den Versen¬ 
dern verstärkt. 

Neue Vertriebswege müssen im tradi¬ 
tionellen PC-Handel gefunden wer¬ 
den. Unser selektives Vertriebskon¬ 
zept sieht ausschließlich Vertragshänd¬ 
ler, übrigens auch im Waren- und Ver¬ 
sandbereich vor. Unser Konzept muß 
allen Strukturen gerecht werden und 
flächendeckend ein zielgruppenorien¬ 
tiertes Einkäufen ermöglichen. 
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Wir haben zur Zeit 1300 Vertriebsstel¬ 
len für den CPC, davon führen etwa 
550 auch den Joyce, weitere 250 sind 
neu hinzugekommen, die ausschließ¬ 
lich den Joyce führen. Von diesen 700 
wiederum, verkaufen ca. 500 auch den 
PC, plus weitere 200 Vetriebsstellen, 
die ausschließlich den PC führen. 

PC Int.: 

Welchen Stellenwert ordnen Sie dem 
PC 1512 zu, die Konkurrenz wird 
bzw. hat teilweise schon reagiert, ge¬ 
rade im Hinblick auf künftige Ent¬ 
wicklungen? 

F. Köster: 

Bereits beim CPC haben wir eine 
nachvollziehbare Produktentwicklung 
vom 464 auf 664 und schließlich 6128 
gehabt. In diesem Sinn ist der PC 1512 
unser »464 der 16-Bit-Welt:«. Der Na¬ 
me Schneider steht mittlerweile neben 
guter Qualität der Geräte und gutem 
Preis-/Leistungsverhältnis auch für 
weitere Innovationen. 

PC Int.: 

Es scheint, als sei der allgemein etwas 
schwachbrüstig ausgefallene Monitor, 
die Qualität der Auflösung ist nicht be¬ 
rauschend, ein möglicher Bremsklotz 
für noch höhere Absatzzahlen. Wird 
Schneider hier reagieren? 

F. Köster: 

Sicherlich kann man davon ausgehen, 
daß 55000 Käufer den Schneider PC 
in Kenntnis der gegebenen Monitor¬ 
qualität erworben haben, also damit 
auch zufriedenstellende Leistung ha¬ 
ben. Weitergehende Ansprüche wol¬ 
len wir jedoch in Zukunft auch 
abdecken. 

PC Int.: 

Der Schneider PC kann gerade im Be¬ 
reich der Bürokommunikation noch ei¬ 
niges zulegen. Mit welchen Produkten 
ist hier zu rechnen? 

F. Köster: 

Hier dauert die Sondierungsphase 
noch an. Im freien Handel sind genü¬ 
gend Produkte verfügbar, die den PC 
gerade in dieser Richtung ergänzen 
können und diese Geschäfte sollen 
auch im Handel getätigt werden. 

PC Int: 

Der Softwaremarkt scheint Ihren In¬ 
teressen entgegenzuarbeiten, in kürze¬ 
ster Zeit ist so etwas wie eine deutliche 


Preissenkung von Programmen bei et¬ 
wa gleichbleibender Qualität zu ver¬ 
zeichnen. Sind Sie mit dieser Ent¬ 
wicklung zufrieden, wo erwarten Sie 
weitere Aktivitäten? 

F. Köster: 

Ich bin mit dieser Entwicklung sehr 
zufrieden und freue mich besonders 
über die schnelle Reaktion der Soft¬ 
wareanbieter. 

PC Int.: 

Mit welcher Software wird Schneider 
den Verkaufserfolg unterstützen? 

F. Köster: 

Unser Angebot wird, wie auch schon 
bei den Systemen CPC und Joyce, in 
jedem Fall überschaubar bleiben. Den 
Software-Anbietern muß genügend 
Raum zum Geldverdienen gewährt 
werden, im übrigen liegt hier auch die 
größere Kompetenz. 

PC Int: 

Auch der als Textsystem angebotene 
Joyce kann als Verkaufserfolg be¬ 
zeichnet werden. Welche Zahlen kön¬ 
nen Sie uns hier nennen? 

F. Köster: 

Bis jetzt sind rund 60000 Joyce ver¬ 
kauft worden, diesen Erfolg werden 
wir in diesem Jahr stabilisieren und die 
Verkaufsförderung noch intensivieren. 
Der Joyce wird als Textsystem gekauft 
und erst in zweiter Linie als Compu¬ 
ter im eigentlichen Sinne genutzt. 
Unser Konzept der Plazierung von 
Joyce als Schreibmaschinen-Ersatz ist 
durch den Erfolg bestätigt worden. 

PC Int: 

Ist eine Joyce-Modifikation geplant? 
Ein verbesserter Drucker sowie eine 
neue Version des Textprogrammes 
LocoScript, ich denke da z.B. an ei¬ 
ne Serienbrieffunktion oder das Rech¬ 
nen im Text, stünde dem Joyce nicht 
schlecht zu Gesicht. 

F. Köster: 

Mit dem neuen Programm Locomail, 
das ab sofort erhältlich ist, wurde ein 
erster Schritt in diese Richtung getan. 
Weitere Varianten sind nicht auszu¬ 
schließen. 

PC Int: 

Der Grundstock zum enormen Ge¬ 
schäftserfolg der Computerdivision 
wurde mit dem CPC 464 im Herbst 


’84 gelegt. Wieviel Geräte der CPC- 
Serie, also inkl. 664 und 6128, konn¬ 
ten bisher verkauft werden? 

F. Köster: 

Die Stückzahl der verkauften CPC- 
Computer beläuft sich auf rund 
250000, monatlich kommen etwa 
10000 Neuverkäufe hinzu. 

PC Int.: 

Welche Zukunft bescheinigen Sie der 
CPC-Serie? 

F. Köster: 

Ein derart erfolgreicher Computer wie 
der CPC 6128 wird auf geraume Zeit 
hinweg weiterhin in großen Stückzah¬ 
len verkauft werden. Mit dem CPC 
464 peilen wir ganz gezielt den Heim- 
und Hobbybereich an. Daher wird die¬ 
ses System ab sofort in Einzelkompo- 
nenten, d.h. Keyboard für DM 
299, —, der MP-2 Modulator zum An¬ 
schluß an einen Farbfernseher für DM 
99, — , erhältlich sein. 

Die bewährten Monitore werden wahl¬ 
weise angeboten, die Preise belaufen 
sich auf DM 199, — für den Grün- und 
DM 699,— für den Farbmonitor. 

PC Int.: 

Abschließend die Frage nach neuen 
Technologien, ich denke da besonders 
an die Prozessoren der 68000’er- 
Familie der Atari’s und Amiga’s. 

Ist das ein Thema für die Schneider 
Computerdivision? 

F. Köster: 

Vor Technologien, die besser sind als 
das bisher verfügbare, kann uncj soll¬ 
te man sich nicht verschließen. 

Allerdings ist hier die Grundkonzep¬ 
tion entscheidend und da sehe ich mo¬ 
mentan und auf absehbare Zeit keine 
klare Aussage für die Anwender. Es 
sollte kein Mischmasch der Techno¬ 
logien stattfinden, wie das zur Zeit mit 
dem Sidecar (Hardware-Zusatz für 
68000’er Rechner, der IBM-Kompa¬ 
tibilität herstellen soll, Anm. d. Jled.) 
veranstaltet wird. Zwei Konzepte, 
sprich Intel und Motorola parallel zu 
fahren, halte ich für nicht angebracht, 
der Anwender wird verunsichert. 

PC Int.: 

Herr Köster, wir danken Ihnen für das 
Gespräch. 
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interessantes 
zu CP/M Plus 

Im diesem und im nächsten Teil der 
Serie zu CP/M Plus soll es Informa¬ 
tionen zur Kommandodatei DEVI¬ 
CE.COM geben. In diesem 
Zusammenhang wird ein trauriger 
Mißstand aufgedeckt. Zu diesem 
Mißstand gibt es dann auch noch 
aufregende Enthüllungen und ein 
Versprechen. Zu guter letzt erwei¬ 
tern wir unsere Datei HELP.DAT 
um die Eintragungen zu DE- 
VICE.COM. 


Die Hardware-Treiber 


Obwohl CP/M Plus gegenüber seinen 
Vorgängern einige bedeutende Neue¬ 
rungen aufweist, sind doch Teile der 
Struktur gleich geblieben. So hat auch 
das BIOS (BASIC Input Output Sy¬ 
stem) einige Veränderungen erfahren, 
doch die grundsätzliche Funktionswei¬ 
se ähnelt den älteren Systemen. Das 
BIOS enthält einen Satz aus 33 Ein¬ 
sprungpunkten (entry points), die das 
BDOS (BASIC Disc Operaing Sy¬ 
stem) aufruft, um die hardwareabhän¬ 
gigen Funktionen ausführen zu 
können. Zu diesen Funktionen gehö¬ 
ren z.B. auch die Peripherietreiber zur 
Ein- und Ausgabe von Zeichen. 

Das BIOS ist also geräteabhängig und 
muß daher vom Computerhersteller 
für sein Gerät geschrieben werden. 
Wie gelangt man zu einem BIOS für 
CP/M Plus? 

Wenn man sich ein komplettes CP/M- 
Betriebssystem von Digital Research 
kauft, dann sind auf einer Diskette die 
kompletten Quellen für ein BIOS ent¬ 
halten. Das mitgelieferte BIOS ist für 
den Computer ALTOS 8000-15 ge¬ 
schrieben und kann als Skelett verwen¬ 
det werden, um es an die eigene 
Hardware anzupassen. Dazu ist es na¬ 
türlich erforderlich, einen CP/M- 
fähigen Computer zu besitzen, der 


über die notwendigen Tools (z.B. As¬ 
sembler und Linker) verfügt. Ein an¬ 
derer Weg ist, das BIOS eines älteren 
CP/M (z.B. 2.2), ebenfalls unter Ver¬ 
wendung der Tools auf CP/M Plus an¬ 
zupassen. Die dazu erforderlichen 
Veränderungen sind in den System¬ 
handbüchern von D.R. beschrieben. 
Im Lieferumfang der Schneider CPCs 
ist die Quelle für das BIOS nicht ent¬ 
halten, sondern lediglich eine lauffä¬ 
hige Version des gesamten CP/M Plus 
auf den Systemspuren einer Diskette. 
Wärend es unter CP/M 2.2 teilweise 
möglich ist, über sogenannte Patches 
mit DDT eine lauffähige Version zu 
modifizieren, hat man unter CP/M 
Plus kaum noch eine Chance. Der 
Grund ist, daß die geräteabhängigen 
Programmteile auf verschiedene Spei¬ 
cherseiten verteilt sein können (und es 
bei Schneiders auch sind). 


Die logischen Treiber 

CP/M Plus hat gegenüber seinen Vor¬ 
gängern einen Vorzug im Behandeln 
der Zeichen-Ein-/Ausgabe. Es ist dem 


Benutzer möglich, die Ein-/Ausgabe- 
Kanäle individuell zu verändern. Um 
die damit verbundenen Möglichkeiten 
zu verdeutlichen, soll hier dargestellt 
werden, welche Ein-/Ausgabe-Kanäle 
CP/M Plus kennt. 

Zunächst wird laut Handbuch folgen¬ 
des definiert: alle einfachen Zeichen- 
Ein-/Ausgaben (simple character I/O 
genannt) erfolgen in 8-Bit ASCII oh¬ 
ne Paritätsbit. Das Zeichen IAH 
(Control-Z) kennzeichnet das Ende ei¬ 
ner Datenübertragung für alle Einga¬ 
bekanäle. Die von CP/M Plus ver¬ 
walteten logischen Ein-/Ausgabeka¬ 
näle sind folgende: 

CONIN = Console Input 
CONOUT = Console Output 

An diese logischen Ein-/Ausgabeka¬ 
näle wird üblicherweise das Periphe¬ 
riegerät angeschlossen, das den 
interaktiven Informationsaustausch mit 
dem Operator gestattet. Im Standard¬ 
fäll ist CONIN also die Tastatur des 
Computers und CONOUT der Moni¬ 
tor. 
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An diesen Kanal wird normalerweise 
ein Drucker angeschlossen. Bei den 
CPCs ist diesem Kanal standardmäßig 
die Centronics-Druckerschnittstelle 
zugeordnet. 

AUXOUT = Auxiliary Output 
(Dieser Treiber hieß unter CP/M 2.2 
PUNCH) 

AUXIN = Auxiliary Input 
(Dieser Treiber hieß unter CP/M 2.2 
READER) 


es unter CP/M Plus möglich, diesen 
logischen Kanälen unterschiedliche 
Hardware-Treiber zuzuordnen. Im 
CP/M-Sprachgebrauch werden die lo¬ 
gischen Kanäle auch als logische Ge¬ 
räte bezeichnet, wärend die Hardware 
Treiber als physikalische Geräte be¬ 
zeichnet werden. An diese Bezeich¬ 
nungen wollen wir uns künftig auch 
halten. CP/M Plus ist in der Lage, 16 
physikalische Geräte zu verwalten und 
entsprechend der eingestellten Konfi¬ 
guration an die fünf logischen Geräte 
anzukoppeln. Wie das möglich ist, be¬ 
handeln wir im der Befehlsbeschrei¬ 
bung zu DEVICE.COM. 

Vorweg jedoch einige Informationen 
zu den physikalischen Geräten und de¬ 
ren Einbindung ins Betriebssystem. 


Das Character I/O Modul 


Im »CP/M PLUS SYSTEM GUIDE« 
von D.R. ist im Anhang das 
Assembler-Listing des zum Lieferum¬ 
fang gehörenden I/O-Moduls abge¬ 
druckt. Dieses Programm-Modul 
enthält als Beispiel alle Routinen, die 
CP/M zur Bedienung der physikali¬ 
schen Schnittstellen benötigt. Dieses 
Modul trägt den symbolischen Namen 
CHARIO und muß als Assembler- 
Quelldatei (also CHARIO. ASM) vor¬ 
handen sein, wenn ein CP/M Plus in¬ 
stalliert werden soll. Der Anwender 
kann dieses Modul benutzen, um sei¬ 
ne Hardware-Schnitstellen an das 
BDOS anzukoppeln. Dazu müssen ei¬ 
nige Konventionen eingehalten wer¬ 
den, die hier kurz beschrieben werden 
sollen. Es müssen im I/O-Modul fol¬ 
gende Unterprogramme existieren: 


Den logischen Kanälen AUXIN und 
AUXOUT werden üblicherweise Pe¬ 
ripheriegeräte zugeordnet, die Kom¬ 
munikation zu anderen Computern, 
z.B. auch über DFÜ ermöglichen. 

Häufigste Komponente ist hier eine se¬ 
rielle Schnittstelle nach RS-232. 

Die vorgenannten logischen Treiber 
CONIN, CONOUT, LIST, AUX¬ 
OUT und AUXIN sind die Schnittstel¬ 
le des BIOS zum BDOS. Im Gegen¬ 
satz zu früheren CP/M-Versionen ist 


Unterprogramm »Character Device 
Input« 

Der symbolische Name muß sein: ?CI 
Eingangsparameter: 

Nummer des physikalische Geräts in 
CPU-Register B. 

Funktion: 

Empfange ein neues Zeichen vom be¬ 
treffenden physikalischen Gerät. 
Ausgangsparameter: 

Empfangenes Zeichen im CPU- 
Register A. 


Unterprogramm »Character Device 
Output« 

Der symbolische Name muß sein: 
?CO 

Eingangsparameter: 

Nummer des physikalischen Geräts in 
CPU-Register B. 

Auszugebendes Zeichen in Register C 
Funktion: 

Sende das Zeichen aus Register C in 
das betreffende physikalische Gerät. 


Unterprogramm »Character Device 
Input Status« 

Der symbolische Name muß sein: 
7CIST 

Eingangsparameter: 

Nummer des physikalischen Geräts in 
CPU-Register B. 

Funktion: 

Gebe bekannt, ob das betreffende phy¬ 
sikalische Gerät ein neues Zeichen zur 
Eingabe bereithält. 

Ausgangsparameter: 

CPU-Register A = 0, wenn kein 
Zeichen 

CPU-Register A = FF, wenn neues 
Zeichen vorhanden. 


Unterprogramm »Character Device 
Output Status« 

Der symbolische Name muß sein: 
7C0ST 

Eingangsparameter: 

Nummer des physikalischen Geräts in 
CPU-Register B. 

Funktion: 

Gebe bekannt, ob das betreffende phy¬ 
sikalische Gerät in der Lage ist, ein 
neues Zeichen auszugeben. 

Ausgangsparameter: 

CPU-Register A=0, wenn das Gerät 
kein neues Zeichen akzeptieren kann. 
CPU-Register A=FF, wenn ein neu¬ 
es Zeichen ausgegeben werden darf. 


Unterprogramm »Character Device 
Initialisation« 

Der symbolische Name muß sein: 
7CINIT 


4’87 PC 21 















I CP/M 


Eingangsparameter: 

Nummer des physikalischen Geräts in 
CPU-Register C. 

Funktion: 

Wird für alle vorhandenen physikali¬ 
schen Geräte aufgerufen, um sie zu 
initialisieren. So wird z.B. die Baudra¬ 
te eingestellt, sofern variabel. Dieses 
Unterprogramm wird nur von DEVI¬ 
CE. COM benutzt. 

Betrachtet man diese Aufstellung, er¬ 
gibt sich zwangsläufig eine Frage. 
Woher soll das Betriebssystem die 
Nummer der jeweiligen physikali¬ 
schen Geräte kennen? Bei 7CINIT 
kann man außerdem fragen: »Woher 
kennt das System die gewünschte Bau¬ 
drate des Geräts?« Dazu gibt es eine 
einfache Antwort: Der Anwender muß 
seine Hardware-Konfiguration in ei¬ 
ner Tabelle mitteilen. 


Die »Character Device Table« 


Eine Tabelle, die unter dem symboli¬ 
schen Namen .ctbl am Ende des Pro¬ 
grammoduls CHARIO stehen sollte, 
enthält alle notwendigen Angaben zu 
den physikalischen Geräten. Der Auf¬ 
bau ist folgender: 

Für jedes vorhandene physikalische 
Gerät sind folgende Angaben zu 
machen: 

6 Bytes: 

Name des Geräts in ASCII (unnötige 
Stellen durch Spaces aufgefüllt). 

1 Byte: 

Modus des Geräts. Hier wird abgelegt, 
ob es ein Eingabe- oder Ausgabege¬ 
rät (oder beides) ist, ob es eine ver¬ 
änderbare Baudrate hat (Centronics hat 
z.B. keine), ob es eine serielle Schnitt¬ 
stelle ist und ob das Handshake- 
Protokoll XON/XOFF möglich ist. 

1 Byte: 

Baudrate (oder »none«, wenn nicht 
vorhanden). Wie die jeweiligen Infor¬ 
mationen genau einzutragen sind, soll 
nicht an dieser Stelle besprochen 
werden. 

Das letzte Byte dieser Tabelle ist eine 
Null als »Tabelle-Ende«-Zeichen. 


Aufgrund der Reihenfolge der Eintra¬ 
gungen in dieser Tabelle weiß das Be¬ 
triebssystem die Nummer des be¬ 
treffenden physikalischen Geräts und 
aus dem Baudrate-Byte die einzustel¬ 
lende Baudrate. 

Warum erzähl’ ich das alles? Ganz 
einfach: wir haben da ein Problem mit 
dem CPC6128. 


Das Handbuch zum CPC 6128 
und die bittere Wirklichkeit 


»Er kann’s nicht lassen«, werden ei¬ 
nige denken. Richtig, wir kommen an 
die Stelle der zynischen Bemerkungen 
zum Handbuch. Wir lesen bei Schnei¬ 
ders im CPC 6128-Benutzerhandbuch, 
Kapitel 5 Seite 28: 

»In CP/M Plus ist eine Unterstützung 
für ein einkanaliges serielles Einga¬ 
be/ Ausgabe-Interface (RS232) einge¬ 
baut. Mit dem Befehl: 

SETSIO 

(ohne Parameter) können Sie....« 
usw., usw. 

Die Tatsachen zeigen aber, daß man 
nicht kann! SESTSIO gibt nach dem 
Aufruf lapidar bekannt: 

SIO not found 

Sollten Sie zu denjenigen gehören, bei 
denen das nicht der Fall ist, dann set¬ 
zen Sie sich bitte mit mir in Verbin¬ 
dung, danke. 

Wir lernen hieraus, daß man bei AM- 
STRAD/Schneider zweifellos vorhat¬ 
te, einen Treiber für eine SIO (Serial 
Input Output) zu installieren, aber aus 
irgendwelchen Gründen davon abge¬ 
lassen hat. Wie ich in meinem Test¬ 
bericht zur seriellen Schnittstelle von 
Schneider (CPC International, Heft 
12/1985, S. 39) bereits bemerkte, ist 
nicht ganz klar, welche Hardware vom 
CP/M Plus des CPC 6128 unterstützt 
wird. Seit dieser Zeit verfolgt mich der 
Gedanke, die serielle Schnittstelle ins 
Betriebssystem einzubinden. Es ist na¬ 
türlich möglich, sich ein unter CP/M 
laufendes Programm zu schreiben, das 
eine serielle Schnittstelle bedient. 


Doch damit ist keine generelle Einbin¬ 
dung erreicht. Z.B. ist es dann immer 
noch nicht möglich, die Fähigkeiten 
des Programms PIP.COM in Verbin¬ 
dung mit der seriellen Schnittstelle zu 
nutzen. Damit besteht kaum eine Mög¬ 
lichkeit, Software zwischen CP/M- 
Computern per DFÜ auszutauschen. 
Auch Programme wie MOVEIT, 
MODEM7 oder KERMIT, die DFÜ 
hervorragend unterstützen, können oh¬ 
ne Einbindung der seriellen Schnitt¬ 
stelle in CP/M natürlich nicht gefahren 
werden. Letzten endes kann man die 
serielle Schnittstelle auch nicht mit 
DEVICE bearbeiten, wenn sie nicht 
eingebunden ist. Die Lösung dieses 
Problems liegt bei der Firma Schnei¬ 
der, die lediglich die Quellprogram¬ 
me für ihr BIOS freigeben brauchte, 
um den Anwendern die Möglichkeit 
einer Anpassung einzuräumen. 


Das Programm DEVTCE.COM 

Nach diesem, sehr theoretischen Aus¬ 
flug in die System-Grundlagen soll 
hier nun Konkretes zum Tool DEVI¬ 
CE. COM folgen. 

Aufgerufen wird das externe CP/M- 
Kommando mit: 

DEVICE (Return) 

Man kann es auch mit Erweiterungen 
aufrufen, die noch beschrieben 
werden. 

Nach dem oben beschiebenen Aufruf 
meldet sich das Programm mit der ak¬ 
tuellen Konfiguration: 

Physical Devices: 

I = Input,O = Output ,S = Serial ,X = 
Xon-Xoff 

CRT NONE 10 LPT NONE O 

Current Assignments: 

CONIN: = CRT 

CONOUT = CRT 

AUXIN: = Null Device 

AUXOUT: = Null Device 

LST: = LPT 

Enter new assignment or hit RETURN 

Diese Meldung teilt sich in zwei Tei¬ 
le auf: 
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1. Es werden die physikalischen Ge¬ 
räte aufgelistet. 

Diese Liste gliedert sich folgen¬ 
dermaßen: 

NAME BAUDRATE (I)(0)(S)(X) 

Wobei die Abkürzungen I, O, S und 
X nur gesetzt werden, wenn sie zu¬ 
treffen. 

Die Bedeutungen der Abkürzungen 
sind: 

I = Eingabegerät 
O = Ausgabegerät 
S = Serieller Kanal 
X = XON/XOFF Handshake 

Analysiert man unter diesem Aspekt 
die Angaben des CPC 6128, ergeben 
sich folgende Erkenntnisse über die 
physikalischen Geräte dieses Com¬ 
puters: 

Es existiert ein physikalisches Gerät 
namens CRT mit folgenden Eigen¬ 
schaften f 

Ein-/Ausgabegerät mit paralleler Da¬ 
tenübertragung ohne Baudrate und oh¬ 
ne Xon-Xoff Handshake. 

Es existiert ferner ein physikalisches 
Gerät mit dem Namen LPT und fol¬ 
genden Eigenschaften: 

Nur Ausgabegerät mit paralleler Da¬ 
tenübertragung und ohne Baudrate 
oder Xon-Xoff Handshake. 


Die Zuordnung zu den logischen 
Geräten 

Aus der Tabelle, die nach dem Auf¬ 
ruf von DEVICE erzeugt wird, erken¬ 
nen wir folgende, aktuelle Zuwei¬ 
sungen: 

Das physikalische Gerät mit dem Na¬ 
men CRT ist den logischen Geräten 
CONIN und CONOUT zugewiesen. 

Das physiklaische Gerät LPT ist dem 
logischen Gerät LST zugewiesen. 

Die logischen Geräte AUXIN und 
AUXOUT sind keinem physikalischen 
Gerät zugewiesen. 

Im Klartext bedeutet diese Aussage 
folgendes: 


Das physikalische Gerät CRT sind 
Bildschirm und Tastatur des Compu¬ 
ters. Dieses Gerät hängt momentan an 
der Operatorkonsole von CP/M Plus 
(CONIN, CONOUT). 

Das physikalische Gerät LPT ist die 
eingebaute Centronics-Schnittstelle. 
Sie ist momentan dem CP/M-Druk- 
kerkanal zugeordnet. 

Im nächsten Teil werden wir lernen 
diese Zuordnungen mit Hilfe von DE¬ 
VICE. COM zu modifizieren. Diesen 
Teil schließen wir mit einer Enthül¬ 
lung ab. 


Wir wecken Dornröschen im 
CPC 6128 


In Ihrem CPC6128 schläft ein physi¬ 
kalisches Gerät namens SIO. Welche 
Hardware es unterstützt ist völlig rät¬ 
selhaft aber Sie haben das Verspre¬ 
chen, daß ich versuchen werde, etwas 
darüber herauszubekommen. 

Es besteht die Möglichkeit, dieses 
physikalische Gerät wachzurufen. Da¬ 
mit fehlt zwar noch die reale Hardwa¬ 
re dieser Schnittstelle, aber man kann 
die Möglichkeiten des Programms 
DEVICE.COM besser demonstrieren, 
wie es im nächsten Teil erfolgen wird. 
Wie aktiviert man die SIO? 

Das Verfahren ist einfach. In der vor¬ 
her angesprochenen Tabelle mit der 
Bezeichnung »Character Device Ta- 
ble« ist die SIO bereits eingetragen! Sie 
ist lediglich verstümmelt, indem das 
erste Zeichen des Namens durch ein 
jähes Ende-Zeichen (Null) ersetzt wur¬ 
de. Unsere Aufgabe besteht darin, den 
Namen und damit die dazugehörenden 
Attribute zu regenerieren. Dazu benut¬ 
zen wir den »simbolic instruction de- 
bugger« SID, der im Umfang der 
CP/M Plus-Tools enthalten ist. Wir 
wollen uns an dieser Stelle nicht lan¬ 
ge mit den Details zu SID aufhalten. 
Sofern Sie nicht bereits über einschlä¬ 
gige Erfahrungen mit SID verfügen, 
brauchen Sie sich nur an die folgende 
Anweisung zu halten. Die gleich fol¬ 
genden Kommandos dienen nur dem 
Zweck, die in der Speicherstelle FE26 
stehende Null durch ein großes S zu 
ersetzen. 


Sofern Sie den Computer danach nicht 
»resetten«, existiert danach ein voll¬ 
ständiger Eintrag der SIO in der Cha¬ 
racter Device Table. 

Regenerieren der Character Device 
Table 

— Starten Sie CP/M Plus von Ihrer 
Systemdiskette. 

— Legen Sie die Seite 2 der System¬ 
diskette ein und starten Sie SID. 

— SID meldet sich mit: 

CP/M 3 SID - Version 3.0 
# 

— Geben Sie nach dem Prompt (#) 
ein: 

SFE26 (Return) 

— SID meldet sich mit: 

FE26 00 

— Geben Sie ein: 

’S’ (Return) 

(Das Hochkomma ’ ist das mit 
SHIFT 7 erzeugte). 

— SID antwortet mit: 

FE27 49 

— geben Sie ein: 

. (Return) 

— SID antwortet mit dem Prompt 

(#) 

— Verlassen Sie SID mit Control C. 

— Kehren Sie nicht mehr ins AMS- 
DOS zurück, sondern bleiben Sie 
in CP/M! 

— Starten Sie aus CP/M das Pro¬ 
gramm DEVICE. 

Sie werden feststellen, daß in der 
Liste der physikalischen Geräte 
nun auch ein Gerät namens SIO 
eingetragen ist. Der Eintrag sieht 
folgendermaßen aus: 

SIO 9600 IOS 

Wir erkennen daraus, daß dieses 
Gerät ein serielles Ein-/Ausgabe¬ 
gerät ist, dessen Baudrate gegen¬ 
wärtig auf 9600 Baud steht. 

Im nächsten Teil werden die wei¬ 
teren DEVICE-Teilkommandos, 
auch im Zusammenhang mit der 
SIO behandelt. Abschließend er¬ 
folgt die Erweiterung der Datei 
HELP.DAT um die neugewonne¬ 
nen Erkenntnisse. 

(Dipl.-Ing. H. Bruhns) 
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Schneider PC für Einsteiger hilft Ihnen beim Start 
in die PCWelt Das Buch ist aber nicht nur ein 
Einstieg in die Grundfunkfionen des Rechners, 
sondern beschäftigt sich auch intensiv mit an¬ 
deren wichtigen Dingen: z.B. mit Software, wie 
den sogenannten GEM-Anwendungen. Von GEM- 
PAINT, das zum Lieferumfang gehört, bis GEM- 
WRITE. Was können die Pakete, wo setzt man 
sie ein usw. Endlich ein Buch, mit dem man PC- 
Zukunft planen kann. 

Schneider PC fUr Einstelger 
Hardcover, 312 Selten, DM 49,- 


BASIC programmieren unter GEM - das große 
BASIC-Buch zum Schneider PC zeigt Ihnen, wie 
es geht. Vom ersten Kontakt mit BASIC2 zum 
ersten Programm, vom ersten Spiel zur profes¬ 
sionellen Anwendung Ein Buch also, in dem der 
Einsteiger genauso das findet, was er sucht, wie 
der Profi Natürlich kommen auch Tips und 
Tricks zu den unterschiedlichsten Bereichen der 
BASIC-Programmierung auf dem Schneider PC 
nicht zu kurz. Alles in allem: Information rundum 
Das große BASIC-Buch zum Schneider PC 
Hardcover, 3B4 Seiten, DM 49,- 


Aus dem Schneider PC kann man noch mehr 
herausholen, als Sie vielleicht vermutet haben. 
Wie das geht? Das sagt Ihnen Schneider PC 
Tips & Tricks. Was kann man mit DOS, GEM, 
BASIC oder auch anderen Programmiersprachen 
machen? Hier ein paar Anregungen: einen Pro¬ 
grammgenerator, eine neue Tastaturbelegung, 
3-D-Grafik mit Shading, eine Dialog-Box, eine 
RAM-Disk, einen Mini-Notizblock mit Batchver- 
arbeifung... Mehr demnächst in diesem Buch: 
Schneider PC Tips & llrlcks 
Hardcover, 245 Selten, DM 49,- 


DAsItANNdcR 


SchNEidER 

PC 

EIN DATA BECKER BUCH 


Ein Buch, auf das Sie 
sich voll und ganz ver¬ 
lassen können. Zwei er¬ 
fahrene Redakteure des 
Computermagazins DATA 
WELT haben sich ein 
Jahr auf den Schneider 
PC vorbereitet. Dann 
testeten sie das Gerät 
gründlich - lange vor der 
eigentlichen Markteinfüh¬ 
rung. Mit diesem Buch 
bekommen Sie nun vor 
dem Kauf Bewerfungs- 
kriterien an die Hand und 
haben nach dem Kauf 
einen schnellen Ratgeber 
bei den vielfältigen 
Fragen rund um den 
Schneider PC. 

Dos kann der 
Schneider PC 
173 Selten, DM 29,- 


DATA BECKER 

Merowingerstr. 30 ■ 4000 Düsseldorf Tel. (0211) 310010 


Das Crosse Bock zu 


MSDOS 

PCDOS 


EIN DATA BECKER BUCH 


Von einer detaillierten 
Einführung bis zu einer 
kompletten Befehlsüber¬ 
sicht aller DOS-Befehle 
mit Syntax, Erklärung 
und Beipieien - auch zu 
DOS 3.2 - finden Sie hier 
alles, was Sie wissen 
müssen. 

Das groBe Buch zu 
MS-DOS/PC-DOS 
Hardcover 
402 selten 
DM 49,- 
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Schneiderware #8 


Unsere Aktivitäten der ersten Schnei¬ 
derstunde gehen unvermindert weiter. 
Mittlerweile umfaßt die Hardwarese¬ 
rie der »SCHNEIDERWARE« die 
stattliche Anzahl von sieben Erweite¬ 
rungskarten. Die Wartezeit seit der 
letzten Karte hat sich meiner Meinung 
nach sicher gelohnt. Ihre Geduld wird 
in diesem Beitrag mit einer Speicher¬ 
erweiterung mit ganz besonderen Fea¬ 
tures belohnt werden. 


Jede Menge Speicher 

Einige Leser unter Ihnen werden sich 
beim Lesen des Wortes Speicherer¬ 
weiterung einen lustlosen Seufzer 
wohl nicht verkneifen können, der 
ausdrücken soll, daß es Speichererwei¬ 
terungen für den Schneider wie Sand 
am Meer gibt. Das muß ich in jedem 
Falle mit einem »leisen« Ja beantwor¬ 
ten. Aber was nützt eine Karte, die ich 
mit Eproms betreiben kann, kann mir 
aber keine Software dazu programmie¬ 
ren. Ich brauche beides nicht, werden 
Sie sagen — das mag auch bedingt 
richtig sein. Aber dann werden Sie nie 
in den äußerst befriedigenden Genuß 
kommen können, zu erleben, wie man 
ein Eprom dazu bringt, seinen Inhalt 
(Programm) nicht nur durch Auslesen 
herzugeben, sondern ihm während des 
Betriebs-Bytes »unterjubeln« zu kön¬ 
nen, was das Eprom auch anstandslos 
und ohne zu murren akzeptiert. Daß 
die dazu erforderliche Hardware die 
einer einfachen Piokarte bei weitem 
übersteigt, dürfte wohl jedem von Ih¬ 
nen klar sein. Aus diesem Grunde 
müssen wir uns wohl wieder mit den 
unvermeidlichen Grundlagen befas¬ 
sen. Ich teile diesen Abschnitt wegen 
der breiten Fächerung in drei Berei¬ 
che ein: die Speicherbausteine, deren 
Ansteuerung im Schneider und die da¬ 
zu benötigte Software. 


Was sind Speicher 
RAM oder ROM 


Wohl jeder, der sich mit Computern 
beschäftigt, kann den Begriff Speicher 
erklären. Wie er allerdings funktio¬ 


niert, wissen nur wenige. Ich möchte 
Ihnen das auf einfache Weise näher¬ 
bringen. Ein Speicherelement ist ein 
elektronisches Bauteil, welches es fer¬ 
tig bringt, digitale Signale in Form von 
Spannungspegeln über einen längeren 
Zeitraum, von Steuersignale koordi¬ 
niert, für sich zu behalten (WRITE- 
ZYKJLUS). Ebenso muß es dem 
Computersystem diesen Inhalt auf An¬ 
forderung übergeben können (READ- 
ZYKLUS). Diese sogenannten »Sta¬ 
tischen Speicher« besitzen im Inneren 
eine große Anzahl einzelner Speicher¬ 
zellen (Flip-Flops), die matrixförmig 
angeordnet und verschaltet sind (sie¬ 
he Bild 1). Durch diese Anordnung 
der einzelnen Elemente besteht die 
Möglichkeit, die Leitungen, die an X 
und Y angeschlossen sind, mittels De¬ 
coderelementen gemeinsam über we¬ 
nige Leitungen anzusprechen. So 
wählt man jede einzelne Zelle aus dem 
schier unendlich scheinendem Ange¬ 
bot von Flipflops heraus. Die Infor¬ 
mation bleibt diesen Speichertypen 


Tabelle 1: Kurzform der Bankingbefehle 


(statische Speicher) solange erhalten, 
wie die Versorgungsspannung einge¬ 
schaltet ist; es sei denn, man puffert 
die Versorgungsspannung mit einer 
Batterie. Eine andere Speicherart sind 
die dynamischen Speichertypen. Das 
Wort »dynamisch« verrät schon etwas 
vom Nachteil dieser Bausteine. Sie 
verlieren nicht nur nach dem Aus¬ 
schalten der Versorgungsspannung ih¬ 
ren Inhalt, sondern tun dies fort¬ 
während nach ein paar Millisekunden. 
Was nützt uns denn solch ein »Spei¬ 
cher«, der gar kein richtiger zu sein 
scheint? Hier werden die speichernden 
Elemente nicht durch Flipflops gebil¬ 
det, sondern bestehen aus winzigen 
Kondensatorelementen. Die Informa¬ 
tion wird durch die Ladung des Kon¬ 
densators repräsentiert, die sich aber 
nach einer kurzen Zeit wieder entlädt. 
Hier muß der Speicherinhalt durch zy¬ 
klisches Lesen und Beschreiben stets 
aufgefrischt werden. Dieser Vorgang 
muß in einer sehr kurzen Zeit stattfin¬ 
den, denn es dürfen die übrigen Ope- 


&BCCE-KL INIT BACK .-SUCHE UND INITIALISIERE ALLE HINTERGRUNGROMS 
:AF UND BC SIND ZERSTOERT 

»B90F-KL ROM SBLECT :SELECTIERE EIN BESTIMMTES OBERES ROM 
:C BEINNHALTET DIE ROMSBLECTADRESSE 
:AF ZERSTOERT 

»B916-KL ROM DESBLECT:STELLE DIE VORIGE OBERE ROMAUSWAHL WIEDER HER 
:C BEINNHALTET DIE ROM SEL.ADR. DES VORIGEN ROM 
!_: B BEINNHALTET DEN VORIGEN ROMSATE 


! —•-> WURDE DURCH KL ROM SELECT UEBERGEBEN 

DIESE FIRMWAREROUTINEN WERDEN IM VERWALTUNGSPROGRAMM VERWENDET 


!VRSROM,Romnr, Datenquelle,Ziel, Anzahl 
Beispiel: 

;wrsrom,&0f,»4000, »c000,»3f ff 


!screenup 
!screendown 

’peeklist,RQMnr,Adresse 
!poken,ROKnr,Adresse,Wert 


schreibt den Speicherbereich 
von »4000 bis &7fff in das ROM 
mit der Adrtesse &0f,beginnend 
an der Adresse »C000. 
verlegt den Bildspeicher an »4000 
verlegt den Bildspeicher an »C000 
listet ein Byte aus dem Speicher 
deren Leseadresse an ROMNr steht 
Speicher den WERT in das Ran,mit 
Romnr,und an die Adresse. 


Tabelle 2: Vorhandene RSX-Befehle 
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Bild 1: Schematische Speicherdarstellung 


rationen der CPU nicht behindert wer¬ 
den. Derartige Probleme begegnen uns 
bei Eproms nicht. Dieses Speicher¬ 
element behält seinen einmal einge¬ 
brannten Inhalt über Jahre hinaus, was 
besonders für Programme, die nach 
dem Einschalten unseres Computers 
sofort zur Verfügung stehen sollen 
(z.B. RSX-Befehle), wichtig ist. Die 
Eproms (ERASABLE PROGRAM- 
MABLE READ ONLY MEMORY), 
sind natürlich auch löschbar. Dies ge¬ 
schieht mit ultraviolettem Licht, wel¬ 
ches über das Quarzfenster auf den im 
Inneren sichtbaren Chip gelangt. Die 
näheren Eigenschaften dieser Baustei¬ 
ne werden wir in einem der nächsten 
Beiträge beleuchten. 


RAM und ROM - 
glücklich vereint! 

Fassen wir nun einige gravierende Ei¬ 
genschaften der für uns wichtigsten 
Speicherbausteine zusammen. Der In¬ 
halt statischer Speicher ist leicht än¬ 
derbar, der von Eproms nicht. 
Statische Speicher verlieren ihren In¬ 
halt nach dem Abschalten der Versor¬ 
gungsspannung, Eproms dagegen 
nicht. Der ideale Speicher für unsere 
Karte wäre deshalb eine Kombination 
aus beiden Speichertypen. Da man 
aber die Eigenschaften dieser Spei¬ 
cherelemente nicht einfach in einen 


Topf werfen kann, bauen wir uns ein¬ 
fach eine Karte, die beide Typen ent¬ 
hält. Die Idee der Pseudoromkarte 
basiert auf der Tatsache, daß sich die 
Hersteller von Speicherbausteinen 
endlich dazu bewegen ließen, RAM- 
Speicher und Eproms (abgesehen von 
den Stcueranschlüssen zum Program¬ 
mieren der Eproms, die man bei 
RAM’s ja nicht benötigt), mit gleicher 
Anschlußbelegung (Pinkompatibel) 
herzustellen. Das führte mich in Ver¬ 
suchung, einer Epromkarte einfach ei¬ 
nen RAM-Baustein in den Sockel zu 
stecken. Nach Um verdrahten des WE 
(Write enable — Schreibfreigabe) — 
Anschlusses, der das Beschreiben der 
Ram’s regelt und bei Eproms meistens 
auf 5 Volt liegt, konnte ich das RAM 
wie ein Eprom ansprechen. Diese Art 
der Speicherung klappt hervorragend. 


DECODIERUNG - 
anders als sonst 


Die Adressdecodierung im üblichen 
Sinn haben wir in früheren Beiträgen 
schon sehr ausführlich besprochen. Da 
man mit einem Z 80 Prozessor, wie 
ihn der Schneider beherbergt, mit sei¬ 
nen 16 Adressleitungen nur 2 hoch 16 
= 65536 (64 KB) einzelner Speicher¬ 
plätze adressieren kann, muß man dem 
System nun sagen, ob ein adressier¬ 
tes Byte in einer anderen Speicher - 


»BANK« Platz fand. Diese Methode 
könnte man als »Softbankingverfah¬ 
ren« bezeichnen. Hier wird die Frei¬ 
gabe der einzelnen Speicherbänke 
mittels Ausgabeoperationen der ext. 
Hardware über den Datenbus mitge¬ 
teilt. Eine andere Methode, den adres¬ 
sierbaren Speicherbereich zu erwei¬ 
tern, besteht darin, zusätzliche Adress¬ 
bus hard- und softwaremäßig zu er¬ 
zeugen (A17,18,19). Das erste 
Verfahren wurde von den »Amstrad« 
Designern auf die Schneider Compu¬ 
ter angewandt. Das ROM im Floppy- 
interface ist hierzu das beste Beipiel. 
Wie Sie aus früheren Beispielen schon 
wissen, besitzt der Schneider parallel 
zum Video-RAM (Monitorspeicher) 
im Adressbereich von hex C000 bis 
hex FFFF maximal 255 adressierba¬ 
re Speicherbänke zu je 16 KB. Leider 
wurde hier nur an die Möglichkeit des 
Lesens von Speichern gedacht. Die 
FIRMWARE (fest eingebautes Be¬ 
triebsprogramm) der Schneidercompu¬ 
ter stellt eine Reihe von Progrämm- 
chen bereit, die das Banking sehr ele¬ 
gant verwalten können. Tabelle 1 stellt 
Ihnen in Kurzform deren Vektoren 
(Einsprungsadressen) zusammen.Um 
nun z.B. die Bank #7 (gleichzeitig 
ROM-Nummer) ansprechen zu kön¬ 
nen (hier befindet sich AMSDOS), 
veranlaßt die Bankinglogik, daß ein 
Byte über den Datenbus mit dem Wert 
7, der sogenannten SELECT-Adresse 
ausgegeben wird. Die Ausgabcadres- 
sc für dieses Byte ist vom Betriebspro¬ 
gramm des Schneiders festgelegt und 
lautet &DFxx. Da sie wie alle Aus¬ 
gabeadressen nicht vollständig deco¬ 
diert ist, haben die niederwertigsten 8 
Bits keine Bedeutung. Wie Sie aus 
dem Schaltbild (Bild 2) erkennen kön¬ 
nen, werden über den Datenbus 
D0-D7 die Selectadressen auf die 4 Bit 
Vergleicher vom Typ 74LS85 gege¬ 
ben. Die jeweils gewünschte Adresse 
(IC 1 = SCHREIBEN/RAM; IC 2 = 
LESEN/RAM; es wird jeweils nur das 
untere Byte verglichen (&0-F)) kann 
über die DIL-Schalter oder Jumperfel¬ 
der eingestellt werden, je nachdem, 
was Sie einbauen. Gelangt nun ein 
Wert an die entsprechenden Verglei¬ 
cher, und dieser entspricht dem ein¬ 
gestelltem Wert der Schalter (offen 
=High), so geht der Ausgang A=B 
Pin 6 des 74LS85 auf HIGH. Dieses 
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High-Signal wird allerdings nur an die 
Ausgänge der Flipflops in Ic 8 durch¬ 
geschaltet, wenn das entsprechende 
Byte über die entsprechende Ausgabe¬ 
adresse &DFxx ausgegeben wurde. 
Als Taktsignal fungiert die decodier¬ 
te Adresse &DFxx, die an IC 6=6 an¬ 
liegt. Im weiteren Verlauf des Sig¬ 
nalflusses muß noch unterschieden 
werden, ob eine Lese- oder Schreib¬ 
operation mit dem Speicher durchge¬ 
führt werden soll. Um das Ganze noch 
zu vereinfachen, bildet man das Le¬ 
sesignal aus dem gesetzten Adressbit 
Al5. Hier ist immer gewährleistet, 
daß der obere Adressbereich aktiv ist. 
Beim Schreiben genügt es, wenn das 
WR-Signal vom WR-Signal des Pro¬ 
zessors abgeleitet wird; hier allerdings 
über den Inverter mit umgekehrten Pe¬ 
gel . Über den Decoder 74 138 und den 
Adressbus A13 — 15 werden die Be¬ 
reiche der beiden 8 KB Bausteine aus¬ 
decodiert. Da es leider noch keine 16 
KB Statik-RAMs gibt, müssen wir uns 
mit dem Baustein 6264 (8k RAM) 
begnügen. Sie sind allerdings mit dem 
Epromtyp 2764 pinkompatibel. Über 
die Signale ROMEN und ROMDIS 
wird dem eingebautem Basicrom (das 


sich ja ebenfalls in diesem Bereich be¬ 
findet) gesagt, es solle sich still ver¬ 
halten. Nachdem wir aber mehrere 
verschiedene Eproms in unserer Kar¬ 
te betreiben wollen, muß die Decodie¬ 
rung für die Eproms etwas anders 
aussehen. Hier leiten wir aus dem 
Freigabesignal ROMEN für das Inter¬ 
ne BASIC-ROM das CE Signal ab. 
Immer, wenn das eingebaute BASIC¬ 
ROM selektiert wird, ist auch ein Ex¬ 
ternes aktiv. Da aber die Selectadres- 
se des BASIC-ROMs über den Da¬ 
tenbus ausgegeben wird, ist der OE 
Anschluß der Roms noch inaktiv, d.h. 
die Ausgangstreiber sind gesperrt. Das 
ändert sich erst, wenn eine externe 
ROM-selectadresse über die Verglei¬ 
cher (IC 3+4) ausgegeben wird, die 
einem angeschlossenem Eprom ent¬ 
spricht. Wenn an das NAND-Gatter 
Ic 5= 13 nun ein High Signal gelangt 
und A15 High wird, wird dieses ent¬ 
sprechende Eprom selektiert. Nun 
kann gelesen werden. Gleichzeitig ge¬ 
langt über den Deseiectteil Ic 14 und 
über die Dioden ein Highsignal an den 
Anschluß ROMDIS, der das eingebau¬ 
te BASIC-ROM kurzerhand ausblen¬ 
det. Dies geschieht auch über Ic 7, 


wenn (wie oben beschrieben) RAM 
gelesen wird. Einen kleinen Nachteil 
hat dieses Verfahren allerdings. Bei al¬ 
len Leseoperationen, die der Prozes¬ 
sor im oberen Adressbereich ab hex 
&C000 ausführt, liest er aus den über¬ 
lagerten Eproms (Basic oder Exten¬ 
sion-ROM). Alle Schreiboperationen 
hingegen gehen in das Video-RAM. 
Alle Anstrengungen, bei Schreibope¬ 
rationen den Bildspeicher auszublen¬ 
den, schlugen fehl. Deshalb nahm ich 
in Kauf, daß beim Beschreiben des 
Pseudo-ROMs auch der Bildspeicher 
(Monitor) mit verändert wird. Die 
Leute von AMSTRAD halten wohl¬ 
weislich auch für diesen Fall eine klei¬ 
ne Maschinenroutine bereit. Mit 
diesem kleinen Programm kann die 
Startadresse des Bildspeichers aus der 
Gefahrenzone transponiert werden. In 
diesem Fall beginnt er an der Adres¬ 
se hex 4000. Dieses Verfahren wur¬ 
de auch bei unserem kleinen Bei¬ 
spielprogramm angewandt. Die Bele¬ 
gung der Jumper für den Einsatz ver¬ 
schiedener Speicherbausteine dürfte 
sich durch einen Blick auf das Schalt¬ 
bild von selbst erklären. In die Steck¬ 
plätze der Eproms können die Typen 
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JJsting 1: 

Hexdump des Uhrtreibers aus 10/86 auf Adresse &cOOO 
angepaßt mit neuer litelzeile. 


1 DATA 8-01,8-00, 8-00, 8-00, 8-12. 8-CO, 8-C3, 8-26, 6-C0, 5-C3 , 8-33 
, 8<C0, 8-C3, 8-16,8-C1 , 8-C3, 1679 

2 DATA 8-43, 8-Ci , 8-49, 8-4E, 8-49, 8-54, 8-B2, 8-57, 8-52, 8-54, 8-49 
, &-4D, 8-C 5,8-54, 8,49, &-4D, 1580 

3 DATA 8-C5,8-44,8-41,8-54, S,C5,8-00, S-F5,8<C5,8<D5,8-E5,8-CD 
,8-43,8-C1, 8-E1 .8-D1.8-C1, 2587 

4 DATA 8-F1, 8-37, 8-C9, S-FE, 8-07,8-C0,8-3E. 8-00, 8-DD, 8-66,8-00 
, 8-CD, 8-A9,4-C0,8-3E, 8-01, 1964 

5 DATA 8-DD, 8-66,8-01,8-CD, 8-A9,8-C0,8-3E, g<02,8-DD, 8-66,8-02 
, 8-CD, 8-A9,8-C0,8-3E, 8-03, 1910 

6 DATA 8-DD, 8-66, 8-03,8-CD, 8-A9,8-C0,8-3E, 8-04,8-DD, 8-66,8-04 
, 8-CD, 8-A9.8-CO, 8-3E, 8-05, 1918 

7 DATA 8-DD, 8-66,8-05,8-CD, 8-A2,8-C0, 8-CD, 8-A9,8-C0,8-3E, 8-0B 
, 8-DD, 8-66,8-06,8-CD, 8-A9, 2229 

8 DATA 8-CO,8-3E, 8-0C, 8-DD, 8-66,8-07,8-CD, 8-A9,8-C0,8-3E, 8-09 
, 8-DD, 8-66,8-08,8-CD, 8-A9, 1938 

9 DATA 8-C0,8-3E, 8-0A, 8-DD, 8-66,8-09,8-CD, 8-A9,8-C0,8-3E, 8,07 
, 8-DD, 8-66,8-0A, 8-CD, 8-A9, 1938 

10 DATA 8-C0,8-3E, 8-08,8-DD, 8-66,8-0B , 8-CD, 8-A9,8-C0, 8-3E, 8-0 

6.8- DD, 8-66,8-0C, 8-CD, 8-A9, 1939 

11 DATA 8-C0, 8-C9, 8-F5, S-7C, 8-CB, 8-DF, 8-67,8-F1, 8-C9, 8-00, 8-0 
0,8<00, 8-07,8<07,8<07,8<07. 1761 

12 DATA 8-CB, 8-DF. 8-CB, 8,97, 8-CB, 8-87,8-CB, 8-CF, 8,01,8-E2, 8-F 

B, 8-ED, 8-79,8-7C, 8,01,8-E3, 2716 

13 DATA 8-FB, 8-ED, 8,79,8-3E.8-F4, 8-01,8-E2,8-FB, 8-ED, 8,79,8-C 

9.8- 21,8-01,8-A6,8-16,8,00, 2174 

14 DATA 8-7A, 8-CD, 8-E1 , 8-C0,8-E6,8-0F, 8-06,8,30, 8,77, 8,23,8-1 

4.8- 3E, 8-10, S.BA, 8,20, 8.F0, 1945 

15 DATA 8-C9,8-C5,8,D5,8-07, 8,07,8-07,8-07,8-CB, 8-DF, 8-CD, 8,0 

C, 8-C1, 8-CD, 8-0C, 8.C1,8,CB, 2088 

16 DATA 8-D7, 8<CB, 8-8F, 8-CB, 8,87,8,01,8-E2,8<FB, 8-ED, 8-79,8-A 
F, 8,01,8-E4, S-FB, 8-ED, 8-78, 2747 

17 DATA 8-57, 8-3E.8-F4,8,01,8<E2,8-FB, 6<ED, 8,79, 8-7A , 8-D1, 8-C 
1, 8-C9,8.C5,8-F5, S-3E, 8,0F, 2473 

18 DATA 8-3D. 8-20,8-FD, 8-F1, 8-CI, 8-C9,8-F5,8-3E, 8,00,8-32,8-0 
0,8-A6, 8-F1, 8-FE, 8-03, 8-28, 2042 

19 DATA 8-03,8,38,8-17,8-DO, 8-DD, 8-6E, 8.04,8-DD, 8-66,8-02,8<C 

D, 8,75,8-BB, 8-DD, 8,7E, 8-00, 1806 

20 DATA 8-32,8,00,8-A6,8<FE, 8-06, 8-28,8-03,8-CD, 8-B4,8-BB, 8,C 
D, 8-CB, 8-C0, 8-DD, 8-21,8,01, 1946 

21 DATA 8,A6,8,18, 8-5C, 8-FE, 8-03, 8,28, 8-03,8,38,8,10,8-DO, 8.D 
D.8-6E, 8,04,8,DD, 8,66,8,02, 1522 

22 DATA 8-CD, 8,75.8-BB, 8-DD, 8-7E, 8-00, 8-CD, 8-B4,8-BB, 8,CD, 8-C 
B, 8<C0,8-DD, 8-21,8-01,8-A6, 2449 

23 DATA 8-CD, 8,01,8-C2,8-CD, 8-D6,8-C 1, 8-DD, 8-7E, 8.06,8-CD, 8,4 

4.8, C2,8,CD, 8-D6,8.C1, 8<DD, 2665 

24 DA.TA 8-7E, 8,08,8-CD, 8-B5,8-C2,8-DD, 8-7E, 8-07, 8-CD, 8-B5,8-C 
2,8<CD, 8.E6,8-C1,8,DD, 8-7E, 2623 

25 DATA 8-OA, 8-CD, 8-B5,8-C2, 8-DD, 8<7E, 8-09,8-CD, 8-B5,8-C2, S.C 
D, 8-E6,8-C 1, 8-CD, 8,20,8-C2, 2585 

26 DATA 8-DD, 8-7E, 8-OC, 8-CD, 8.B5,8<C2,8-DD, 8-7E, 8-OB, 8-CD, 8-B 

5.8, C2, 8-CD, 8-D6,8-CI, 8-CD, 2694 

27 DATA 8-EC, 8.C1, 8<DD, 8-7E, 8-05,8-CD, 8-2B, 8-C2, 8,CD, 8-B5,8-C 
2,8<DD, 8-7E, 8-04,8-CD, 8-B5, 2540 

28 DATA 8-C2,8-CD, 8-E6,8-C1, 8-DD, 8-7E, 8,03,8-CD, 8,BS, 8-C2, 8-D 

D, 8.7E, 8,02,8-CD, 8.B5,8-C2, 2681 

29 DATA 8-CD, &-E6,8-C1, 8-DD, 8-7E, 8-01,8-CD, 8-B5,8-C2, 8-DD, 8-7 

E, 8-00, 8-CD, 8-B5,8-C2, 8-C9, 2684 

30 DATA 8-3E, 8-20,8-CD, 8-B5,8<C2,8<C9,8-3E, 8-20, S-CD,8-B5,8-C 

2.8- 3E, 8.3A, 8-CD, 8-B5,8-C2, 2249 

31 DATA 8-3E, 8-20, 8,CD, 8<B5,8-C2, S-C9,8-3E, 8.3A, 8-CD, 8-B5,8-C 

2.8, C9,8-3E, 8.55,8-CD, 8-B5, 2309 

32 DATA 8-C2.8-3E, 8-48,8-CD, 8<B5,8-C2,8<3E, 8,52,8-CD, 8-B5,8-C 
2,8,3E, 8,20, 8.CD, 8.B5,8-C2, 2306 

33 DATA 8-C9.8-3E, 8-44,8<CD, 8<B5,8-C2,8-3E, 8-41,8-CD, 8-B5,8-C 
2,8,3E, 8-54,8.CD, 8,B5,8-C2, 2344 

34 DATA 8-3E, 8-55,8.CD, 8-B5,8-C2,8-3E, 8<4D, 8-CD, 8-B5,8-02,8-3 
E, 8-20,8-CD, 8-B5, 8-C2,8-C9, 2321 

35 DATA 8-3E, 8-31,8-CD, 8.B5,8-C2,8-3E, 8-39,8-CD, 8-B5,8-C2, S-C 


9.8- FE, 8-38, 8,28,8-09, 8.FE, 2204 

36 DATA 8-39,8,28, 8-09, S-FE, 8-3A, 8,28,8-09,8-C9,8-3E, 8,30,8,1 

8.8- FB, 8-3E, 8,31,8,18,8-F7, 1435 

37 DATA 8-3E, 8-32, 8-18, 8-F3,8-FE, 8,30, 8,28,8,19,8-FE, 8,31,8-2 

8.8.21.8- FE, 8-32.8-28, 8,29. 1507 

38 DATA 8-FE, 8,33, 8-28,8,31,8-FE, 8-34,8-28,8,39,8-FE, 8,35,8-2 
8,8,4 1,8-FE, 8-36,8,28, 8-49, 1630 

39 DATA 8-C9,8-3E, 8-53, 8-CD, 8.B5,8,C2,8-3E, 8-4F, 8-CD, 8.B5,8<C 

2.8.18.8- F3, 8-3E, 8-4D, 8-CD, 2258 

40 DATA 8.B5, 8,C2, 8-3E, 8-4F, 8-CD, 8-B5,8-C2,8-18,8cE7, 8-3E, 8,4 
4, E-CD, 8-B5,8,C2,8-3E, 8-49, 2196 

41 DATA 8-CD, 8,B5,8.C2, 8-18, 8-DB, 8-3E, 8-4D, 8-CD, 8-B5,8-C2,8,3 
E, 8-49, 8-CD, 8-B5,8-C2, 8-18, 2281 

42 DATA 8-CF, 8-3E, 8,44,8-CD, 8-B5,8-C2,8-3E, 8-4F, 8-CD, 8,B5, 8,C 

2.8.18.8- C3,8-3E, 8-46,8-CD, 2194 

43 DATA 8-B5,8-C2, 8-3E, 8-52,8-CD, 8-B5.8-C2,8-18,8-B7,8-3E, 8,5 

3.8- CD, 8-B5,8-C2,8-3E, 8,41, 2158 

44 DATA 8-CD, S-B5,8-C2,8-18, 8.AB, 8.F5, 8-3A, 8-00, 8-A6,8-FE, 8-0 

8.8- 28,8,05,8<F1,8-CD, 8-5A, 2087 

45 DATA 8-BB, 8-C9,8-F1, 8-CD, 8-2B, 8-8D, 8-C9,8-00, 1267 

46 dat*0:sz=0:dz= 1 

47 FOR adr = 8,4000 TO 8-42C7 

48 READ byte : dat=dat+i 

49 sz=sz+byte 

50 POKE adr,byte 

51 IF dat < 16 AND adr < 8-42C7 THEN 55 

52 READ chksum 

53 IF chksumOsz THEN PRINT "Fehler in zeile :":d 
z 

54 dz=d2 + 1 ; sz=0:dat=0 

55 NEXT adr 

56 » das File "UHRCOOOx.obj",ist fuer die Pseudoro 
mvesion angepasst 

57 * der Speicherbereich ab 8-4000 dient nur als Zw 
lschenbuffer ,und 

58 ’ Programm lauft an dieser Adresse nicht.Es ist 
nur in einem Rom 

59 ’ oder Pseudorom lauffaehig ab adresse 8<c000.en 
d 


Listing 2: 

Rommon.bas: Rommonitor mit ROM-Verwaltung 


10 MEMORY 8-3FFF : LOAD" vws rom. ob j ", 8-9800 : CAL 
L 8-9800 

11 ISCREENDQWN:MODE 2:PRINT" *** Pseudoro 
m-Monitor **#" 

20 LOCATE 20,10:PR INT"L E S E N 
- 1 - " 

30 LOCATE 20,12:PR1NT"S C H R E I B E N 
- 2 

35 LOCATE 20. 14:PR INT”T ESTEN 
- 3 

40 at=1NKEY$:1F a*="" THEN GOTO 40: 

50 IF a$ = " 1" THEN GOTO 1000 

60 IF a*="2" THEN GOSUB 2000 

61 IF a*="3" THEN GOSUB 3000 
70 GOTO 20 

1000 REM »»»»»i»******»****«***»«»*»**»»»* 
#**»»****)(*»#)*)( 

1010 REM lesen Pseudoram 

1020 REM #*»##«#*###**«««**#«#***#*«*»*«** 
»*»***»•(*#**»*# 

1030 ’ 

1031 MODE 2:WINDOW #1,1,80,1,6:WINDOW #0,1 
,80,11,25:WIND0W#2,1,80,7,10 

1040 CLS:PR I NT ” Programmteil Lesen " 

1050 PR I NT:PR I NT: 

1060 LOCATE 10,10:INPUT "Startadresse HEX 
ohne (8-) " ; star t $: LOCATE 50, 10: PR I NT” 

":IF Start* 3 "" THEN LOCATE 50,10: 
PRINT CHR*(24)"F EHLER "CHR*(24):GOTO 
1060 


[3316] 

[5215] 

[2778] 

[1875] 

[1955] 

[1743] 

C1316] 
[988] 

11651 ] 
C3981 
[2031] 

[1674] 

[2031] 

[117] 

[6142] 

C3018] 

[757] 

[101391 


i 
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HEX o [6650] 


1070 LOCATE 10,12:1NPUT"Endadresse 
hne (&>" ;ende*:LOCATE 50,12:PR 1 NT” 

":IF ende*="" THEN LOCATE S0,12:PRINT 
CHR*(24)"F EHLER "CHR*(24):GOTO 1070 
1075 LOCATE 10, 14 : 1 NPUT"Rom leseadressse 8« 
xx " ; roint: LOCATE 50,14:PRINT" " 

:1F rom*="" THEN LOCATE 50,14:PRINT CHR*(2 

4) "F EHLER "CHR*<24):GOTO 1075 

1080 CLS:CLS#i :CLS#2: Start = VAL( "8," +start* ) 

:ende=VAL("8."+ende$):rom=VAL("8,"+rom*):adr 
= start:ant=RIGHT* <(startt),2):an = VAL("8,"+a 
n*) 

1082 PRINT #2," ";:FOR s=an TO an+15: 

PRINT#2,CHR*(24);HEX*((s),2);" ";CHR*<24> 

;:NEXT 

1090 ’ Anfang Leseschleife 

1100 CLS:PR 1 NT#1, "lesen Speicher ";"# 

HEX*(rom) 

1110 PRINT HEX*(adr);" ";:FOR x=l TO 16:1 
PEEKLIST,rom,adr:PRlNT " ";:adr = adr +1:NEXT 
:PR INT 

1120 IF adr>ende THEN PR I NT:PR I NT "lesen b 
eendet Taste druecken !";:CALL 8,BB18:G0T0 
11 

1130 GOTO 1110 

2000 REM »**«*#****»#****###*****#***#*«»# 
*«*«**«*«*«*»« 

2010 REM schreiben Pseudora 

m * 

2020 REM »****«*****»»***«****«*#*****»*** 
************** 

2021 MODE 2: W INDOW #1,1,80,1,6:WINDOW #0,1 
,80,11,25:UIND0W#2,1,80,7,10 

2030 CLS:PRINT" Programmteil Schreiben " 
2040 PR 1 NT:PR 1 NT 

2050 LOCATE 10,10:INPUT "Startadresse HEX 
ohne <&) " ;Start*:LOCATE 50,10:PRINT" 

" : IF start* = "" THEN LOCATE 50,10: 
PRINT CHR*(24)"F EHLER "CHR*<24):GOTO 
2050 

2060 LOCATE 10 ,12:INPUT"Ram schreibadresse 
8<xx rom* :LOCATE 50,14:PR1NT" 

": IF rom* = "" THEN LOCATE 50,14:PRINT CHR 
*(24)"F EHLER "CHR*(24):GOTO 2060 

2070 CLS : CLS# l:CLS#2:start = VAL("8< M + start*) 
:rom = VALC"8," + rom*> :adr = start 

2071 PRINT #2," ";■FOR s=an TO an +15 

:PR I NT#2,CHR*(24);HEX*(<s),2);" ";CHR*<24 

)j:NEXT 

2080 PRINT CHR*(24);HEX*(adr);CHR*(24);" 

";:FOR x=l TO 16:LOCATE#1,1,1:1NPUT#1," El 
NGABE ”,wert*:lF wert*“"" THEN GOTO 11 ELS 
E wert=VAL("&"+wert*):!PQKEN,rom,adr,wert: 
PRINT HEX*<(wert),2);" ";:adr=adr+l:NEXT 

2081 PRINT " " 

2090 GOTO 2080 

3000 ’*««»*******#»***»»***»**»»*»******#« 
*«««*»***»»****» 

3001 'testen zweier Speicherbereiche in p 
seudobereichen * 

3002 * **«#*»»***«##««»**»*#*»***'***»****** 
*#***«»**#*»»*«* 

3010 MODE 2:WINDOW #1,1,80,1,6:W1NDOW #0,1 
,80,11,25:W1ND0W#2,1,80,7,10 
3020 CLS :CLS# 1 :CLS#2.-LOCATE# 1, 1, 1 : INPUT#1, 
"eingabe Startadresse ohne 8. "jstart* 

3030 INPUT#1,"Orginial Romadresse ohne & 
XX "jsource* 

3040 INPUT#1,"kople Romadresse ohne 8, 

XX "jdestination* 

3041 start=VAL("8," + start$):source=VAL("8<" + 
source*>•destination=VAL("&"+dest1nat1on*) 

3042 PRINT#1, :PR1NT#1:PRINT#1, "Abruch mit 
ESC und <ENTER>” 

3050 ’ vergleich anfang «»**»*****« 

3060 LOCATE 1,10: 


[89523 


[61443 


[22223 


[11173 

[32863 


[54883 


[54143 


[349 3 
[19923 

E11223 

C19923 

[61423 

[31993 
[743 3 
[103763 


[94153 


[47323 


[22223 


[117433 


[5203 

[3473 

[21543 

[27723 

[21543 

[61423 

[34103 

[49213 

[29773 

[53763 

(44353 

[12503 

[7873 


3070 FOR x = start TD S.FFFF : t»= I NKEY* : IF T*= [131911 
CHR*(13) THEN GOTO 11 ELSE !WRSROM,source, 
x, 8.8000, 1: ! WRSROM, destInatIon, x, 8.8001,1 :a = 

PEEK ( 8.8000) : b = PEEK (8.8001) : LOCATE 1, 1:PR!NT 
HEX*((x),4);" ";HEX*(<a),2);" n ;HEX*((b), 

2): IF aOb THEN GOTO 3500 ELSE NEXT 
3500 CLS:CLS#1:LOCATE#1,1,1:PRINT#1,"F E H [55303 
LER an ADRESSE ":LOCATE 1,1:PR 
INT HEX*((x),4);” ";HEX*((a),2);" ";HEX*<( 
b), 2) 

3600 CLS#2:LOCATE #2,1,1:PR 1NT#2, "weit [56413 
e r TASTE druecken " : CALL 8.BB18: star t = x 
+ 1:GOTQ ,3070 


Listing 3: Datalader von VWSROM.OBJ 


5 MEMORY 8.97FF 

10 DATA 8.00,8,00, B.00,8.00, 8.01,8.0D, 8.98,8.21, 199 
20 DATA 8.00, 8.98, E.C3,8.D1,8.BC, 8.24,8.98,8.C3, 1127 
30 DATA 8.54,8.98, 8.03,8.82,8.98, 8.03,8.88,8.98, 1196 
40 DATA 8.C3, 8.A4, 8.98,8.C3, 8.B4,8.98,8.C3,8.C8, 1433 
50 DATA 8,98, *,C3,8,E1, 8,98,8,43,8,41,8.4C.8.CC, 1136 
60 DATA 8.53,8.43, &S2, 8.45,8.45,S.4E, 8.55, S.D0, 741 
70 DATA 8.53,8.43, 8.52,8.45,8.45,8.4E, 8,44,8.4F, 595 
80 DATA 8,57,8.CE, 8,53,8,45,8.4C, 8,45,8.43, 8.D4, 869 
90 DATA *.57,8.52,8.53,8.52, 8.4F.8.CD, 8.50, 8.4F, 777 
100 DATA 8.4B, 8.45,8.CE, 8.50, 8,45,8.45,8.4B, 8.4C, 719 
110 DATA 8.49, 8.53, 8.D4,8.00,&FE, 8,06, 8.C0, S.DD, 1041 
120 DATA 8,66,8.0B, 8.DD, 8.6E, 8.0A, 8.22,8.7F, 8.98, 767 
130 DATA 8.DD, 8.7E, 8.08,8,32, 8,81,8,98,8.DD, 8.46, 977 
140 DATA 8.05, 8.DD.8.4E, 8,04,8.DD, 8.56,8,03, 8.DD, 839 
150 DATA 8.5E, 8.02, 8.DD, 8.66,8.01,8.DD,8,6E, 8,00, 751 
160 DATA 8.DD, 8.7E, 8,06,8.DF, 8.7F, 8.98,8.C9, 8.00, 1056 
170 DATA 8.00,8.00, 8.3E, 8.C0, 8.CD, 8,08,8.BC.8.C9, 856 
ISO DATA 8.3E, 8.40,8.CD, 8.08, 8.BC, 8.C9,8.DD, 8.66, 1051 
190 DATA 8.05,8,DD,8<6E, 8.04,8.DD, 8.56,8.03,8.DD, 871 
200 DATA 8.5E, 8.02, &DD, 8.46,8.01,8.DD,8,4E, 8.00, 687 
210 DATA 8.DD, 8.7E, 8.06,8.C9,8.FE, 8,01, S.C0,8.DD, 1222 
220 DATA 8.4E, 8.00,8.2A, 8.7D, 8.AE, 8.11, 8.9B, 8.A6, 757 
230 DATA 8.CD, 8.CE, 8.BC, 8.C9, 8.FE, 8.04,8.C0,8.DD, 1471 
240 DATA 8.4E, 8.06,8.CD, 8.0F, 8.B9, 8.C5,8.CD, S.8E, 1033 
250 DATA 8,98,8.ED, 8.B0, 8.CI, 8.CD, 8.18,8.B9, 8.C9, 1373 
260 DATA 8.FE, 8.03,8.C0,8.DD, 8.4E, 8.04,8.CD, 8.0F, 972 
270 DATA 8.B9,8.C5,8.DD.8.7E, 8.00,8.00,8.66,8,03, 1055 
280 DATA 8.DD.8.6E, 8.02,8.77,8<C1,8,CD, 8.10,8.B9, 1059 
290 DATA 8.C9,8.FE, 8.02,8.C0,8.DD, 8.4E, 8.02,8.CD, 1155 
300 DATA 8.0F, 8.B9,8.C5,8.DD, 8.66,8.01,8.DD, 8,6E, 1052 
310 DATA 8,00, 8.7E, 8.CD, 8.FF, 8,98,8.3E, 8.20, 8.CD, 1037 
320 DATA 8.5A, 8.BB, 8.C1, 8.CD, 8.18,8.B9,8.C9,8.5F, 1180 
330 DATA 8.0F, 8.0F, 8.0F, 8.0F, 8.E6,8.0F, 8.CD, 8.10, 526 
340 DATA *«99, 8.7B, 8<E6,8<0F, 8.CD, 8.10,8.99,8.09, 1096 
350 DATA 8,FE, 8.0A , 8.38,8.02,8.C6,8.07,8.C6,8.30, 773 
360 DATA 8.CD, 8.5A, 8.BB, 8.C9,8,00, 683 
370 dat=0:s2=0:dz= 10 
380 FOR adr = 8.9800 TO 8.991C 
390 READ byte : dat=dat+l 
400 sz=sz+byte 
410 POKE adr,byte 

420 IF dat < 8 AND adr < 8.991C THEN 460 

430 READ chksum 

440 IF chksumOsz THEN PRINT "Fehler ln zelle 
dz 


450 dz=dz + 10 : sz*0:dat=0 

460 NEXT adr 

470 CALL 8.9800: NEW 
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2732, 2764 und 27128 gesteckt wer¬ 
den. Wer die kleinen 2 KB Eproms 
noch einsetzen möchte (sie kosten 
mittlerweile mehr als die großen Brü¬ 
der 64 und 128), dem kann auch ge¬ 
holfen werden. Hier macht man an Pin 
23 der Epromfassung eine Trennstel¬ 
le und legt diesen Pin auf konstant 5 
Volt, und schon ist auch ein 2716 lauf- 
fähig. Der Übersichtlichkeit wegen ha¬ 
ben wir hier keinen Jumper spendiert. 
Wegen der einfachen Decodierung ist 
es natürlich nur möglich, ein Eprom 
einzusetzen. Das heißt, daß beim Typ 
27128 der ganze 16 KB Bereich, beim 
2764 nur die Hälfte und beim 2732 mit 
4 KB nur ein Viertel des reservierten 
Bereiches benutzt werden kann. Wie 
Sie es bei der SCHNEIDERWARE 
schon immer vorfänden, können meh¬ 
rere Karten parallel betrieben werden. 


Die SOFTWARE - 
klein aber fein 


Jetzt haben Sie allerhand an Informa¬ 
tionen über Speicher erhalten. Nun 
werden wir uns mit der benötigten 
Software befassen. Das Problem beim 
Auslesen eines Speichers, der sich in 
einem überlagerten Bereich befindet, 
ist beachtlich. Ich habe im Verwal¬ 
tungsprogramm einige RSX-Befehle 
geschaffen, die diese Aufgabe zu un¬ 
serer vollsten Zufriedenheit erfüllen. 
Wie Sie wissen, gehen alle Leseope¬ 
rationen im oberen Adressbereich in 
das BASIC-ROM. Wollen wir nun ein 
Byte z.B. aus dem siebten (Floppy- 
ROM) lesen, müssen wir uns der 
Firmware bedienen. Während der Be¬ 
fehlsausführung muß mit der Routine 


»KL L ROM SELECT« ein entspre¬ 
chendes ROM selectiert werden. Mit 
der Routine »KL ROM DESELECT« 
wird der ursprüngliche Zustand wie¬ 
der hergestellt. Möchte man nun ein 
Programm in einem externen ROM 
ausführen, so kann man diese Routi¬ 
ne nicht einfach mit CALL ADRES¬ 
SE anspringen, denn man würde 
unweigerlich ins Video-RAM gelan¬ 
gen. Da in diesem Speicherbereich für 
den Call-Befehl mit Sicherheit keine 
sinnvollen Werte stehen würden, be¬ 
fördert sich Ihr CPC ungeniert ins Jen¬ 
seits. Hier können wir auf einen 
RSX-Befehl zugreifen, der uns er¬ 
laubt, jede beliebige Adresse im Sy¬ 
stem anzuspringen. Eine Auflistung 
der vorhandenen RSX-Befehle zeigt 
Ihnen Tabelle 2. Sie möchten vielleicht 
auch eine Routine in Ihr neugebautes 
Pseudo-ROM schreiben. Hier möch¬ 
te ich Ihnen nur kurz den Weg be¬ 
schreiben. wie man das macht. Wenn 
Ihnen ein Assembler (Z.B.GENA31) 
zur Verfügung steht, müssen Sie nur 
die ersten 5 Zeilen des Uhrentreibers 
löschen und durch die Bytefolge 
&01 ,00,00,00 ersetzen, beginnend bei 
der Adresse &C000. Diese Bytes sind 
der Kennsatz oder auch HAEDER ge¬ 
nannt. Das erste Byte &01 ermöglicht 
dem Kernel, das ROM als Hinter¬ 
grund-ROM zu identifizieren. Sieben 
dieser Extension-ROMs kann der CPC 
verwalten. Die drei folgenden Bytes 
sind unbedeutend. Sie können z.B. die 
Versionsnummer oder einen Pro¬ 
grammindex beinhalten, dürfen aber 
auch mit 0 belegt sein, ganz wie Sie 
wollen. Diese Änderung im 
Hintergrun-ROM ist eigentlich die ein¬ 
zige, die Sie durchführen müssen, um 


eine vorhandene RAM-residente RSX- 
Erweiterung an ein Hintergrund-ROM 
anzupassen. Sollte das RSX- 
Programm Speicherzellen verwenden, 
deren Inhalt sich während der Pro¬ 
grammausführung ändert, muß dieser 
Bereich in den Memorypool verlegt 
werden, denn das Kernel kann nur mit 
besonderen Vorkehrungen aus exter¬ 
nen ROMs lesen.Um nun dem Be¬ 
triebssystem eine andere Einschalt¬ 
meldung verpassen zu können, bedie¬ 
nen wir uns eines einfachen Tricks. 
Nach dem Einschalten des Computers 
springt das Betriebssystem in alle an¬ 
geschlossenen externen ROMS und 
versucht sie zu initialisieren. Dazu be¬ 
dient es sich des RSX-Befehls, der in 
der Befehlsliste an erster Stelle einge¬ 
tragen ist. Dieser Befehl beinhaltet als 
Kennzeichen für eine ordnungsgemä¬ 
ße Initialisierung einen Code, der das 
CARRY-BIT setzt (SCF). Vor diesem 
Befehl greifen wir mit unserer neuen 
Titelzeile ein. Da natürlich unser neu¬ 
es Programm Register des Prozessors 
verändert, müssen wir diese beim Ein¬ 
sprung in diesen Programmteil erst 
einmal retten. Danach springen wir 
mit einem Call Adresse in das Uhren¬ 
programm und restaurieren danach die 
Register wieder. Besitzen Sie einen 
Assembler, so können Sie den Text di¬ 
rekt eingeben. 


690 IN1T2:PUSH AF 

(REGISTER 

691 

PUSH BC 


692 

PUSH DE 

(RETTEN 

693 

PUSH HL 


694 

CALL PR DAT! 

.UHR AUFRUFEN 

695 

POP HL 

; 

696 

POP DE 

; REGISTER 

697 

POP BC 


698 

POP AF 

■RESTAURIEREN 

699 

SCF 

(CARRY SETZEN 

700 

RET 

(RUECKSPRUNG 


Brandheiße Knüllerpreise 


Schneider 

CPC 6128 mil Grünmonitor 869 - 

CPC 6128 mit FarOmonitor 1499.- 

Joyce PCW 6256 1549, - 

Joyce Plus 2099,- 

PC rnit SW-mon + 1 Lautwerk 1849,- 

+ 2 Lautwerken 2249,- 

PC mit SW-mon + 1 Laufwerk 

4- 10 MB-Festpiane 3149,- 

dto + 20 MB Festplatte 3599,- 

PC mit Farbmon + I Laufwerk 2249. - 

+ 2 Laufwerken 2679,- 

PC mit Farbmon r I Laufwerk 

+ 10 MS-Festplatte 3599- 

dto + 20 MB Festplatte 4049.- 

Akusli kkoppler Dataphon S21 d 229, - 

Akustikk Dataphon S 21 / 23 339,- 

Disketten 

3" Zoll für CPC 6126 1 St 12,- 

lOSt 95- 

5 1/4" 3M 744 D-O SSDD 10 Sl 33, - 

100 St 209- 


Epson 

Drucker anschlulMerlig an CPC 6128/ 


PC i Atari ST und Comm AMIGA 
LX 66 749,- 

FX 600 1049,- 

FX1C00 <319,- 

LQ 300 1499 

LQ 1000 1949,- 

LQ 2500 2629 - 

EX 800 1419- 

EX 1000 1679 - 

IX 600 1679,- 

SO 2500 3649- 

Coiorkit für EX 800/1000 219, - 

Star 

NL-10 anschlußfertig 

NIG-10 anschlußfertig 899. - 

Commodore 

AMIGA 2000 mit Farbmonitor 1C81 3599.- 

Ccmmodore PG-10 II 2499,- 

Commodore C 128 □ 1169,- 

Commodore SX-64 1479,- 


'.»■sairakoslenpauscMe (WSrenwerl Ins DH 600. -/darüber)- IWauskasselDM 9.-J20.-) Nachnahme (DM 11,20/23,201. Ausland (DM 18,-130,-) 
LWeiuin nur gegen NN odei Vorauslasse. Ausland nar Vortasse. Preislisl« (Compulerlyp angedenl gegen Zusendung eines Freiumschlags 

CSV RIEGERT 

Schloßhofstr. 5, 7324 Rechberghausen, Tel. (0 71 61) 5 20 89 



ulerslore. 


Hochstraße 11 
8500 Nürnberg 80 
Tel.: 09 11 / 28 90 28 


Alle Oig.nal SCHMEIDER P-odukre 
zu günstigen Preisen lieferbar 
PC-ZU8EH0R: 


PC Erweiterung auf 640k 

59- 

CYSANfilecard 10MByte 

898- 

inkl. Software XIREE 


VORTEX Filecard 20MByte 

1396- 

Tvpenraddrucker SD-I5i 

748- 

S'ARWRITER PC 

298- 

XTREEdas Progr. für d s Ver 


walLng Ihrer Harodisc 

135- 

JOYCE ZUBEHÖR: 


JOYCE Nach-üslsalz 

598- 

JOYCE-RAM Erweiterung 

80- 

Typenradorucker SD 15” 

596- 

JOYCE Zweillaulwerk FD 2 

628- 

MOUSE PACK 

246- 

LOCOMAIl 

126— 

SUPERCCPYJOYCE 

85- 

’ASWORD 80CC!deutsch 

148- 



CPCf JOYCE ZUBEHÖR: 
3"Marken(fisl(elten 10 Sl 
NEVADA COBOI 
NEVADA FORTRAN 
SUPERCOPY CPC 
TURBO PASCAL 
DR DRAW 
CPC-ZUBEHOR: 

CPC 464/G-üri + DD 1 
Laufwerk DDl-1 
Laufwerk FD 1 mit Kabel 
CUMANA-Zwcltlaufwerk 
dk (ronics MK-Erweiler 
AufrDslung dk-tronite 256K 
Aufrüstung VORTEX u-n 256K 
SJPFRCOPY CPC 
TURBO—PASCAUGrafik (0) 
DRUCKER: 

NEC P6 (24 Nadeln) 

STAR NI 10 


75.— 
109 — 
109,— 
79- 
199,- 
199, 

798, 

3S8,- 

398,- 

369, 

129— 

38.- 

78- 

79- 
259,- 
199. 
1298. 

7-18.- 


Wir tühren zu den Orialnal-SCHNEIOER-Produkten Artikel verschiedener Firmen wie 
DATA BECKER, V0RTÖ(, STAR-DIVISION. CUMANA, GERDES, PROFISOFT, ARIOLA, 
RUSH-WARE, MARKT & TECHNIK, SYBEX, STAR, SCHNEIDER-DATA usw.l 
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Platinenservice 


Für Ihren CPC 

Die CPC-Schneiderware ist ein univer¬ 
selles Peripheriesystem für die Schnei¬ 
der CPC's auf der Basis des bekannten 
ECB-Bussystems. Um die Schneiderwa¬ 
re an Ihren CPC anzuschließen, benö¬ 
tigen Sie: 

1 Das Verbindungskabel vom Expan¬ 
sionsport des Rechners zur Basis¬ 
platine (Rechnertyp beachten, da An¬ 
schlüsse bei 464/664 verschieden 
von 6128) 

2. Die Basisplatine, welche die Pinbe¬ 
legung der CPC-Ports auf die des 
ECB-Systems umsetzt, Diese Karte 
enthält fünf Steckplätze zur Aufnah¬ 
me und gleichzeitigen Ansteuerung 
der Schneiderware- Erweiterungs¬ 
karten, 

Wollen Sie nur eine Karte betreiben, so 
können Sie diese über ein selbstgefer¬ 
tigtes Kabel an den CPC anschließen. 
Die Anschlußbelegung dieses Kabels 
sehen Sie in Heft 7/86, S.61. 

Das verwendete Platinenmaterial ist 
glasfaserverstärktes Epoxydharz; die 
beidseitig beschichteten Platinen sind 
chemisch durchkontaktiert. Für die Fer¬ 
tigbausteine kommen Bauteile erster 
Wahl zum Einsatz. 


Gesammelte Werke 

Die SCHNEIDERWARE begann in Heft 
6/86. Uber den Platinenservice stehen 
Ihnen alle Karten zur Verfügung. 

Die Preise: 

Basisplatine, unbestückt 24,90 DM 


dto., bestückt 62,90 DM 

Kabel 464/664 35,90 DM 

Kabel 6128 45,90 DM 

Centronics, unbestückt 17,90 DM 

dto., bestückt 79,90 DM 

V/24, unbestückt 29,80 DM 

dto., bestückt 139,90 DM 

Netzteil, unbestückt 17,90 DM 

dto, bestückt 119,90 DM 

Trafo 79,90 DM 

Karte und Trafo 184,90 DM 

Hardware-Uhr, unbest. 29,80 DM 

Hardware-Uhr, bestck. 99,90 DM 


PIO-Karte, Platine unbest. 29,80 DM 
PIO-Karte, Karte bestck. 198,90 DM 
MIDI-Interf., Plat. unbest. 39,90 DM 
MIDTInterface kompl. best.198,00 DM 


EPROM-RAM-Karte 

Diese Karte ist eine Erweiterung, die es 
Ihnen ermöglicht, eigene oder fremde 
Programme beim Einschalten des Rech¬ 


ners oder nach Aufruf direkt aus 


Zahlungsbedingungen: 

Gesamtpreis zuzüglich 5,- DM Por¬ 
to/Verpackung (im Ausland 8,- DM 
Porto/Verpackung). 

Am einfachsten per Vorkasse (Verrech¬ 
nungsscheck) oder als Nachnahme zu- 
zügi. der Nachnahmegebühr (in das 
Ausland nicht möglich). 


Bitte Postkarte im 
Heft benutzen! 



■ 


Platine, unbestückt 

SCHNEIDERWARE ist in drei Versionen 
für Sie verfügbar. Sie können nach Bau¬ 
plan selbst bauen, die fertig bestückten 
und geprüften Karten über den Platinen¬ 
service erhalten oder die unbestückte 
Platine erwerben. Diese werden in Indu¬ 
striequalität gefertigt, sind verzinnt und 
gebohrt; doppelseitig beschichtete Pla¬ 
tinen sind chemisch durchkontaktiert 
und geprüft. Hierbei haben Sie den Vor¬ 
teil, die Platine nicht selbst herstellen zu 
müssen, jedoch die Bestückungskosten 
zu sparen und die Bauteile selbst einzu¬ 
kaufen. 



EPROM oder akkugepuffertem RAM ein¬ 
zuladen. Diese Kombination hat den 
Vorteil, daß selbstgeschriebene Pro¬ 
gramme zunächst im RAM getestet wer¬ 
den können, bevor sie in das EPROM 
gebrannt werden. Heft 4/87 enthält Bau¬ 
anleitung und Treibersoftware dieser 
Karte. 

Die Preise: 

Platine, unbestückt 29,80 DM 
Karte, funktionsfertig 229,90 DM 


A/D - D/A-Wandler 

Mit dieser Karte können Sie analoge 
Werte (Temperatur, Spannung, Hellig¬ 
keit usw.) über acht A/D- Kanäle in digi¬ 
talisierter Form in den Rechner einge¬ 
ben und digitale Werte, die der Rechner 
bereitstellt, in analoge Signale wandeln. 
Die Karte ist mit einem A/D- und zwei 
D/A-Bausteinen bestückt; einer der D/A- 
Wandler ist nicht beschältet und steht 
zur freien Verwendung zur Verfügung. 
Ein Rasterfeld ermöglicht die einfache 
Erstellung von Testschaltungen. Die 
Bauanleitung zu dieser Karte ist in Heft 
3/87 veröffentlicht. 

Die Preise: 

Platine, unbestückt 29,80 DM 

Karte, funktionsfertig 169,90 DM 


PC Schneider International 

Postfach 250, 3440 Eschwege 
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Bestückungsplan 

Nun assemblieren Sie den Quelltext 
mit ÖRG #C000 und ENT #C000 
mit der OPTION 16 in einen Speicher¬ 
bereich hinter die Symboltabelle des 
Devpac (das macht der Assembler 
selbständig). Nach dem Assemblieren 
speichern Sie den Quellcode auf Dis¬ 
kette. Diejenigen unter Ihnen, die kei¬ 
nen Assembler ihr Eigen nennen 
können, können sich die Werte aus 
dem äbgedruckten Hexdump (Listing 
1) entnehmen. Sie müssen die Zahlen 
aber mit Hilfe des ROM-Monitors (Li¬ 
sting 2) eintippen. In der Menuefunk- 
tion 2 des ROMMONitors können Sie 
nach Angabe der gewünschten ROM- 
Selectadresse und der entsprechenden 
Anfangsadresse durch bloßes Eintip¬ 
pen der Hexzahlen Ihr Programm dem 
Pseudo-ROM übergeben. Das Hex¬ 
dump enthält die lauffähige und ange¬ 
paßte Version des Uhrentreibers aus 
Heft 10/86 mit der geänderten Ein¬ 
schaltmeldung. Liegt Ihr Programm 
als Binärfile auf Diskette vor, so la¬ 
den Sie das File an die Adresse 
&4000. Mit dem Verwaltungspro¬ 
gramm für das Pseudo-ROM (VWS- 
ROM.OBJ) ist es nun eine Leichtig¬ 
keit, das Maschinencodeprogramm an 
die entsprechende Stelle ins Pseudo- 
ROM zu schreiben. Der Befehl 
: W RSROM, &0F, &4000, &C000, &3 fff 
überträgt einen Bereich von 16 KB 
(&3fff bytes) an die Adresse des 
ROM's, das die Schreibadresse &0f 
besitzt. Die Startadresse der Daten¬ 
quelle ist &4000: Demnach lautet die 
SYNtAX für diesen Befehl 
:WRS ROM, ROMSEL., QUELLE, ZIEL, 
ANZAHL 


Dieser Befehl ist sehr universell zu 
verwenden. Durch Ändern der ROM- 
Selectadresse und der Datenquelle 
kann man den Inhalt eines ROMs in 
einen bestimmten Speicherbereich 
überspielen. Am besten, Sie experi¬ 
mentieren mit diesen Befehlen, um 
sich mit der Wirkungsweise vertraut 
zu machen. 

Einige Tips zum Umgang mit dem 
Pseudo-ROM 

Solange das Programm nun im ROM 
steht und über die Batterie gebuffert 
wird, meldet sich dieses ROM jedes¬ 
mal beim Einschalten ihres Rechners 
oder nach jedem Warmstart (CTRL + 
SHIFT + ESC) mit der neuen Mel¬ 
dung. Wenn Sie jedoch Ihren Rech¬ 
ner zum Abstürzen bringen, ganz 
gleich aus welchem Grund, so kann es 
passieren, daß das RAM mit unsinni¬ 
gen Zeichen beschrieben wird. Wenn 
auch nur das erste Byte einen anderen 
Wert besitzt, was bei einem Eprom ja 
nicht vorkommt, hängt sich Ihr CPC 
beim Abfragen der externen ROM 
während der Initialisierung auf. Sie er¬ 
wecken Ihren Rechner wieder zum Le¬ 
ben, wenn Sie die Batteriespannung 
unterbrechen (Jumper), was aber zur 
Folge hat, daß Ihr mühsam eingetipp¬ 
tes Programm auf Nimmerwiederse¬ 
hen verschwindet. Eine wesentlich 
effektvollere Methode ist, dem ent¬ 
sprechenden Eprom eine Leseadresse 
(mittels Jumper) größer 7 aufzubrum¬ 
men. Adressen von 08 bis Of sind 
möglich. Nach dem Einschalten kön¬ 
nen Sie mittels ROM-Monitor das ver¬ 
änderte RAM reparieren. Wenn Sie 


Glück haben,ist nur das erste Byte zu 
Null geworden. Ein irrtümliches Be¬ 
schreiben des RAM zu verhindern ist 
durch das Schließen des Jumpers, der 
mit WP (Write Protect) bezeichnet ist, 
möglich. Diese Brücke setzt den 
Schreibfreigabeeingang der RAMs auf 
konstant 5 Volt. Die Herstellung der 
Platine dürfte für Sie als ausgefuch¬ 
ste Hardwareprofis kein Hindernis 
mehr sein. Aber lassen Sie mich doch 
noch einige Tips zum Aufbau nachrei¬ 
chen. Die ICs gehören in gute Fassun¬ 
gen. Im unteren Teil der Schaltung 
sehen Sie zwei Dioden neben dem 
Jumper 7, der die Spannung für den 
Accu unterbricht. Diese Dioden soll¬ 
ten unbedingt Germaniumdioden sein; 
sie besitzen eine kleinere Schwellspan¬ 
nung als Siliziumtypen. Der parallel¬ 
geschaltete Widerstand begrenzt den 
Ladestrom des Accus; der Wert rich¬ 
tet sich nach dem eingesetzten Accu- 
typ. Bei einem Accu 3,6 V = 100 
mA=h hat sich ein 120 Ohm Wider¬ 
stand bestens bewährt. Sie können sich 
auch selbst beliebige Einschaltmeldun¬ 
gen (Liebeserklärung an Ihre Freun¬ 
din) ins Pseudo-ROM schreiben, um 
so Ihrem CPC eine eigene, ganz indi¬ 
viduelle Note zu verleihen. Das näch¬ 
ste Mal werden wir die entwickelten 
und lauffähigen Programme fest in ein 
Eprom brennen. Wir stellen Ihnen ei¬ 
nen universellen Eprommer vor (in¬ 
clusive Software natürlich), der alle 
zur Zeit gängigen Typen brennt. 

(P. Richter) 

Stückliste der Schaltung: 

D1,D2: 1N4148 
D3.D4: AA 109 oder ähnliche 
GERMANIUMdiode 
AC1-3: Akkus 1,2 V ca. 100 mAh 
R1-R16: 4,7k 
R17,R18: 680 
R19,R20: 15k 
R21: 360 (siehe Text) 

CI: 470 uF 
C2,C3: 100 nF 
IC 1-4: 74LS85 
IC5: 74LS00 
IC6: 74LS32 
IC7: 74LS02 
IC8: 74LS175 
IC9,IC11: EPROM 2764 
IC10.IC 12: RAM 6264 
IC 13: 74LS138 
IC14: 74LS00 
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Einzelheft-Bestellung 

Nachfolgende Ausgaben von Schneider CPC International sowie 
Sonderhefte sind noch vorrätig und können über den DMV Verlag be¬ 
zogen werden. 

Bei einem Bestellwert von mindestens 15,- DM werden keine Porto- 
und Versandgebühren erhoben; bei einem Bestellwert unter 15,- DM 
werden 3,- DM Porto/Verpackung berechnet (Ausland 5,- DM 
Porto/Verpackung) Lieferung nur gegen Vorkasse (V.-Scheck) 
Bestellung Ausgaben (bitte ankreuzen): 


□ 10/85 

5, - DM 

□ 12/85 

5,- DM 

□ 1/86 

5, - DM 

□ 2/86 

5, - DM 

□ 3/86 

5, - DM 

□ 4/86 

5, DM 

□ 5/86 

6, DM 

□ 6/86 

6, - DM 

□ 7/86 

6, - DM 

□ 9/86 

6, - DM 

□ 10/86 

6, - DM 

□ 11/86 

6,- DM 

□ 12/86 

6,- DM 

□ 1/87 

6, - DM 

□ 2/87 

6,- DM 

□ 3/87 

6, - DM 

□ Sonderheft 1/86 

14, - DM 

□ Sonderheft 2/86 

14, - DM 

□ Sonderheft 3/86 

14, - DM 

□ Sonderheft 4/87 

14, - DM 



Porto/Verpackung (nur bei einem Bestellwert unter 15,- DM) 

DM 

Gesamtbetrag 

DM 


□ Einen Verrechnungsscheck in Höhe des Rechnungsbetrages 
habe ich beigefügt. 


Datum 


Unterschrift (bei Minderjährigen des gesetzl Vertreters) 


$ Ja, senden Sie mir bitte sofort 


Mehr Erfolg mit 

Schneider 

CPC 464/664/6128 

strapazierfähiger Ringbuchordner. 
Format DIN A4, Grundwerk ca. 400 
Seiten, Bestell-Nr.: 2400, Preis: DM 92,- 

Alle 2-3 Monate erhalte ich Ergän¬ 
zungsausgaben zum Grundwerk mit 
jeweils ca. 120 Seiten zum Seiten¬ 
preis von 38 Pfennig. (Abbestellung 
jederzeit ohne Angabe von Gründen 
möglich.) 



Mehr Erfolg mit 

Schneider CPC «4 


Meine Anschrift; 


Name, Vorname 


Straße, Hausnummer 


PLZ, Wohnort 


Datum 


Unterschrift 


Bitte unterschreiben Sie auch ihre Sicherheitsgarantie, 

mit der Sie folgendes zur Kenntnis nehmen: Sie haben das Recht, ihr 
angefordertes Werk sowie Jede nachfolgende Ergänzungsausgabe 
innerhalb von io Tagen ab Lieferung an den INTEREST-VERLAG, Industrie¬ 
straße 21. 8901 Kissing zurückzusenden, wobei für die Fristwahrung das 
Datum der Absendung genügt Sie kommen dadurch von allen Verpflich¬ 
tungen aus der Bestellung frei. 


5atum 


»Databox Einzelbestellung» 


CPC 

Highlights 1 
Highlights 2 

Ausgabe 8/85 
Ausgabe 9/85 
Ausgabe 10/85 
Ausgabe 11 /85 
Ausgabe 12/85 


Kassette 

□ 14,- DM 

□ 14,- DM 


□ 14 

□ 14 

□ 14 

□ 14 

□ 14 


- DM 

- DM 

- DM 

- DM 

- DM 


D Alle 1985er CPC- 
Databox-Kass. 
inkl. Highlights 
zum Gesamt¬ 
preis von 
70,—DM 


Ausgabe 

1/86 

□ 14,- 

DM 

Diskette 3“ 



Ausgabe 

2/86 

□ 14,- 

DM 

2/86 

□ 

24.- 

DM 

Ausgabe 

3/86 

□ 14,- 

DM 

3/86 

□ 

24, - 

DM 

Ausgabe 

4/86 

□ 14.- 

DM 

4/86 

□ 

24, - 

DM 

Ausgabe 

5/86 

□ 14,- 

DM 

5/86 

□ 

24,- 

DM 

Ausgabe 

6/86 

□ 14,- 

DM 

6/86 

□ 

24, - 

DM 

Ausgabe 

7/86 

□ 14,- 

DM 

7/86 

□ 

24, - 

DM 

Ausgabe 

8/86 

□ 14,- 

DM 

8/86 

□ 

24,- 

DM 

Ausgabe 

9/86 

□ 14, - 

DM 

9/86 

□ 

24,- 

DM 

Ausgabe 

10/86 

□ 14,- 

DM 

10/86 

□ 

24, - 

DM 

Ausgabe 11 /86 

□ 14,- 

DM 

1 1/86 

□ 

24, - 

DM 

Ausgabe 12/86 

□ 14,- 

DM 

12/86 

□ 

24, - 

DM 

Ausgabe 

1/87 

□ 14,- 

DM 

1/87 

□ 

24,- 

DM 

Ausgabe 

2/87 

□ 14,- 

DM 

2/87 

□ 

24,- 

DM 

Ausgabe 

3/87 

□ 14,- 

DM 

3/87 

□ 

24,- 

DM 

Ausgabe 

4/87 

□ 14,- 

DM 

4/87 

□ 

24, - 

DM 


Joyce 


Joyce 5/86... 


.5/86 

□ 

24. - 

DM 

Joyce 6/86. 



□ 

24 - 

DM 



. 7/86 

□ 

24 - 

DM 

Joyce 8/86. 



□ 

24. - 

DM 

Joyce 9/86. 


. 9/86 

□ 

24 - 

DM 

Joyce 10/86. 


.10/86 

□ 

24 - 

DM 

Joyce 11 186 . 


.11/86 

□ 

24 - 

DM 

Joyce 12/86. 



□ 

24 - 

DM 

Joyce 1/87 . 


.1/87 

□ 

24,- 

DM 

Joyce 2/87. 


. 2/87 

□ 

24,- 

DM 

Joyce 3/87 



□ 

24, - 

DM 

Joyce 4/87. 


.4/87 

□ 

24,- 

DM 

+ Porto/Verpackung (Portoiverp inisnua, 

DM) Ausland 5-DM) 



DM 

Gesamtbetrag 





DM 


□ Diesen Betrag bezahle ich mittels des beigefügten Verrechnungsschecks 

□ Ich bitte um Lieferung per Nachnahme (nur innerhalb der BRD) 

Bei Nachnahme kommt zum o g Betrag noch die Nachnahmegebühr hinzu 


Unterschrift 


Dalum 


Unterschrift (bei Minderjährigen Ges gesetzl Vertreters) 






















































Dieses speziell für Schneider CPC 464/664/6128 
entwickelte Nachschlagewerk gibt Ihnen: 

• hundertprozentig lauffähige Programme und 
Anwendungsbeispiele für Wirtschaft, Technik 
und Hobby 

Sie erhalten u.a. in Teil 5 menügesteuerte Pro¬ 
gramme, die Sie bequem mit einer Maus steuern 
können, sowie darauf abgestimmte Programme 
zur Datenauswertung und Dateiverwaltung 

• Programmierkurse für BASIC, Assembler und 
Turbo-Pascal 

Der BASIC-Kurs inTeil 6 hilft Ihnen u. a. alle Mög¬ 
lichkeiten des BASIC-Interpreters zu nutzen Ne¬ 
ben Lokomotive BASIC 1.0 werden die Besonder¬ 
heiten von Lokomotive BASIC 11 erläutert 
Das Programmieren in Maschinensprache er¬ 
möglicht Ihnen der Z 80-Assembler-Kurs 
Ein Programmier-Intensiv-Kurs in Turbo-Pascal 
zeigt Ihnen die richtige Vorgehensweise bei der 
Programmerstellung: Von den Methoden der 
Software-Erstellung bis zum effizienten Einsatz 
von Prozeduren und Funktionen 

• rechnerbezogene Programmierkurse für Grafik 
und Sound 

Schritt für Schritt vermittelt Ihnen der Grafikkurs in 
Teil 4 die grafischen Möglichkeiten Ihres CPC's 
und nebenbei entsteht ein hervorragendes Gra¬ 
fikprogramm mil Spriteeditor und allem was 
dazugehört 

Wie Sie Töne und Klänge aus dem S/D (Interface 
Device Controller) Ihres CPC's hervorlocken, 
zeigt Ihnen dieses Handbuch 

• neue Tips, Tricks und Utilities 

wie CP/M-Utilities, Floppyroufinen, Programm¬ 
transfer vom C 64 zum CPC, Simulation von 
CPC 664- und 6128 Befehlen auf dem CPC 464. 

• detaillierte Systembeschreibungen 

Sie lernen Aufbau und Aufgaben sämtlicher Bau¬ 
steine kennen und natürlich auch das Zusam¬ 
menspiel dieser Komponenten Mit diesem Wis¬ 
sen sind Sie selbst für .Hardware-Operationen", 
wie das Ersetzen vom PROMs durch EPROMs, 
bestens gerüstet 

• Bauanleitungen für Hardwareerweiterungen 

wie Lightpen oder Userport 

• Ergänzungsausgaben 

zum Grundwerk mit neuen Programmen, Routi¬ 
nen, aktuellen Hard- und Soffwareerweiferun- 
gen, zusätzlichen Sprachkursen und praktischen 
Anwendungsh i nweisen 


Fordern Sie noch heute an. 

Mehr Erfolg mit Schneider CPC 464/664/6128 

strapazierfähiger Ringbuchordner, Format DIN A4, 
ca. 400Seiten, Besteil-Nr. 2400, Preis: DM 92- 

Alle 2 3 Monate erhalten Sie Ergänzungsausgaben zum 
Grundwerk mit jeweils co 120 Seilen zum Sellenpreis von 
38 Pfennig (Abbestellung jederzeit möglich) 


Industriestraße 21 
D 8901 Kissing 
Tel 08233/23900 


INTEREST-VERLAG 

Fachverlag 

für anspruchsvolle 

Freizeitgestaltung 


Schneuter CPC 

Tu'bo__Fi ' | _ 

i neu« 


Tips. Trick», U'äihei 


CPC 6128 


CPC 464 
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I Bericht 


Knack die Nuß 


Das N-Damen-Problem 

Heute wollen wir mal wieder Nüsse 
knacken. Es geht um folgende Auf¬ 
gabe: 

»Auf einem n mal n großen Schachbrett 
sollen Damen auf dem Spielfeld so pla¬ 
ziert werden, daß sie sich gegenseitig 
nach den Schach-Regeln nicht schlagen 
können.« 

Zur Erinnerung noch einmal das Zug¬ 
schema der Dame beim Schachspiel: 
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Aus den Bedingungen folgt, daß ein 
n*n-Schachbrett auch maximal mit n 
Damen bestückt sein darf (probieren 
Sie es aus!), und diese müssen ähnlich 
wie die Springer im Schach bei der Da¬ 
menbedrohung zueinander gestellt 
sein: Das folgt aus der Bedingung, daß 
sie sich nicht schlagen dürfen. Aber wie 
genau? 

Gauß folgerte daraus, daß man von 
links nach rechts fortschreitend in jede 
Spalte des Schachbrettes eine Dame, 
und zwar immer an die tiefstmögliche 
Stelle setzt. Wenn nun der Augenblick 
kommt, wo man keine Dame mehr in 
einer Spalte aufstellen kann, so erhöht 
man den Platz der Dame in der vorher¬ 
gehenden Spalte — und dies solange, 
bis man fortfahren kann. 

Um dieses Verfahren zu programmie¬ 
ren, muß man zunächst die Stellung ei¬ 
ner Dame auf dem Schachbrett geeig¬ 
net beschreiben: Dies geschieht durch 
n Zahlen d(i), wobei i die Nummer der¬ 
jenigen Spalte ist, in der die Dame 
steht. So bedeutet zum Beispiel d(2)=3, 
daß die Dame Nummer 2 (also in der 
Spalte 2) in der 3. Zeile steht. 


Die erste Lösung des Problems für n=5 
lautet: 

1. d(l) = 1 (1. Spalte/1. Zeile) 

2. d(2) = 3 (2. Spalte/3. Zeile) 

3. d(3) = 5 (3. Spalte/5. Zeile) 

4. d(4) = 2 (4. Spalte/2. Zeile) 

5. d(5) = 4 (5. Spalte/4. Zeile) 

Daraus ergibt sich folgender Spielfeld¬ 
aufbau: 
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12345 

(Weitere Lösungen würden sich durch 
eine Drehung des Brettes ergeben). 

Bei n=4 gibt es 2 mögliche Lösungen, 
bei n=5 sind es 10, bei n=6 sind es 4, 


bei n=7 40, bei n=8 sind es schon 92 
Lösungen, bei n=9 beträchtliche 352 
mögliche Lösungen, für deren Berech¬ 
nung der Computer (CPC) mehr als 
eine Stunde benötigt. 


Um das Programm schneller zu ma¬ 
chen, gibt es zumindest für die CPC- 
Serie die Möglichkeit, falls Sie den 
TAIFUN-Compiler von ISS haben, das 
BASIC-Programm zu compilieren. 
Hierzu sind folgende Änderungen 
nötig: 

250 DIM d(100) 

270 DIM 1(100) 

Um das Programm in MC zu verwan¬ 
deln, sind folgende Schritte notwendig: 

- BASIC-Grundprogramm (siehe un¬ 
ten) eingeben 

- TAIFUN laden mit RUN 
“TAIFUN 

- »N« drücken (für »Keine Parameter 
verändern«) 

- Kleine ENTER-Taste im Zehner¬ 
block drücken (Compiler!) 

- Abspeichern unter Angabe eines 
Namens nach Drücken der Taste 
»S« auf Kassette oder Diskette 

Sie werden es kaum glauben, aber das 
compüierte Programm braucht für n=9 
statt über einer Stunde nur noch unter 
5 Minuten für die vollständige Lösung 
des Problems. 

Doch nun zurück zu unserem spartani¬ 
schen Programm: 

Das BASIC-Grundprogramm zur Lö¬ 
sung dieses Problems dürfte auch auf 
dem Joyce und sogar auf dem neuen PC 
laufen ... 

(Eckehart Röscheisen) 


100 REM 12721 

110 REM Knack dl« Nueel £9821 

120 REM Das N-DAMEN-PROBLEM £10203 

130 REH Loeaungaverfahp«n nach Gaues (30353 

140 REM 464. 664, 6128. Joyce, PC (20173 

150 REM 31.10.1086 E.R. £13271 

160 REM £2723 

170 REM CLS £4763 

180 REM Eingabe dar Fetdgroeseo: (24441 

190 INPUTTo Jdgroesae " jn £19301 

200 REM Sondirfsells pruefsn: (30551 

210 IF n<4 THEN PRINT"K«ln« Loeeung !":END £32733 

220 REH CLS £4763 

230 REM Spa 1tanenzah1 festlegen. (19533 

240 REM Fu«r moegliehe Loesungen: £25053 

250 DIM d(n) £2911 

260 REM Fuer don «r»t«n Zug £19513 

270 DIM 1(n) £ 2271 

280 REM Die «rate Spaltei (16713 

290 1=1 £4231 

300 REH Zugzaahlar xuruackaatzen £10523 

310 z=0 £3431 

320 REH Anfang fuer «rate Dane: £17831 

330 d(1>=0 £3823 

340 REM Dame um «ln« Zalla vor: £15733 

350 d(l)=d(l)*l (6363 

360 REM Dame bedroht 7 (12261 

370 GOSUB 590 £9661 

380 REH Ueitarsuchen: £13581 

390 IF b*-l AND d< t)<*n THEN GOTO 350 £14001 

400 IF d(1)>n AND t>0 THEN 1=1-1|G0T0 350 (20191 

410 IF l<n THEN 1=1*1:d(11*O:G0T0 350 £17821 

420 REM arstan Zug merkan: £8851 

430 z-z*t £7021 

440 IF z«l THEN GOSUB 670:G0T0 490 £18611 


450 REM Neue Loeeung 7 (19551 

460 GOSUB 720 (9331 

470 IF nau=0 THEN END £7091 

480 REM Ausgabe das Zugas: £10813 

490 PRINT £8453 

500 REM Ausgabe der teufenden Loaaung: £23373 

510 FOR k*l TO n (13443 

520 PRINT d<k >) 17313 

530 NEXT k (3733 

540 PRINT £3613 

550 1=1-1 £4403 

560 IF £ >0 THEN GOTO 350 £609 3 

570 END £1103 

580 REM SUB: Dame bedroht 7 (6103 

690 b=0 (312) 

600 REM Sonder fall: £16261 

610 IF 1*1 THEN RETURN (1392) 

620 FOR 3=1 TO 1-1 £1005) 

630 IF d(1)=d< 3 > OR ABS(d!ll-d(3>) = l-3 TH (2461) 
EN b=-l 

640 NEXT 3 £3701 

650 RETURN £655) 

660 REM SUB: Ereten Zug aerken £18263 

670 FOR 3=1 TO n (795) 

680 l<3)=d(J) £1181 

690 NEXT 3 £3701 

700 RETURN £555) 

710 REM SUB: Neu# Loeeung 7 £23711 

720 neu=0 (542) 

730 FOR k=l TO n (13441 

740 !F I(k)=d< k) THEN GOTO 760 (1439) 

750 n«u=-l £657] 

760 NEXT k £3731 

770 RETURN £SSS) 
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DAS PROFESSIONELLE CAD-SYSTEM 

GRAFPAD 3 

FÜR DEN JOYE PCW 825 6 UND PCW 8512 



■ Frei wählbarer Zeichensatz 

■ Freiwählbarer Cursorsprung 

■ Maßstabgerechtes Erstellen 

■ 16 verschiedene Linientypen 

von Zeichnungen 

■ 16 verschiedene Schriftarten 

■ Maßeinheiten können angegeben 

■ Dehnen, kippen, rotieren, kopieren 

werden 

■ Verschieben und löschen aller 

■ 16 verschiedene Zeichnungsebenen 

Symbole, Texte, Objekte 

■ Symbolbibliotheken können angelegt 

■ Vergrößern und verkleinern 

werden 

■ Abrunden von Kanten 

■ Stufenlose Zoomfunktionen 

■ Automatisches Bemaßen 

■ Freiwählbares Raster 

■ Schraffieren 


Die Sensation: 

DM 549.- 

Verkaufspreis inclusive 1 Grafiktablett, 1 Soft¬ 
ware G3,1 Interface, 1 Zeichenstift 

RHD, Ralf Hille Datentechnik 
Im Lübbering 19, Tel. (0 2339) 7379 oder 7191 

Vertrieb Schweiz: SwiGOITI SA 

60, Route De Boujean, CH-2502 Biel - Bienne 

Tel. (032) 422784 oder 231833 


Ausschneiden und auf Postkarte kleben 

O Hiermit bestelle ich per Nachnahme/Vorkasse 
O Senden Sie mir bitte ausführliches Informationsmaterial 


Vorname. Name 
Straße, Hausnummer 
PLZ, Ort 
Telefonnummer 


Datum, Unterschrift 

















I—Programm 


Superplan 

Folgende Möglichkeiten stehen dem Anwender bei Super¬ 
plan zur Verfügung: 

Terminbearbeitung 

Hier können Termine für jeden Tag eines Monats einge¬ 
geben und gelöscht werden, eine Alarmzeit kann gesetzt 
werden und eine Tagesterminübersicht kann ausgedruckt 
werden. Alle Termine werden automatisch gespeichert. 

Kalenderanzeigen 

In diesem Programmteil kann ein jeder Monatskalender an¬ 
gezeigt und ausgedruckt werden. 

Druckerparameter 

Hier können je nach Belieben die Druckwerte für Unter¬ 
streichung, NLQ, Zeilenabstand usw. verändert bzw. an¬ 
gepaßt werden. Der Drucker muß hierbei unbedingt 
angeschaltet sein. Angepaßt ist der NLQ 401. 

Adressen Verwaltung 

Mit dieser Option können bis zu 100 Adressen und Tele¬ 
fonnummern abgespeichert werden. Eine andere Verwen¬ 
dung ist ebenfalls möglich. Außer der Eingabe kann ebenso 
gelöscht, angezeigt oder sortiert werden. Sortiert werden 
allerdings nur bereits abgespeicherte Adressen. Man muß 
also nach einer Neueingabe zuerst ins Hauptmenue zurück. 
Systemparameter 

Hintergrundfärbe, Stiftfarbe usw. kann man mit diesem 
Programmteil seinen persönlichen Wünschen anpassen und 
weitere Programmläufe speichern. Ebenso kann hier die 
Uhrzeit neu gestellt werden. 

Kalenderanpassen 

Die Daten (Weihnachten, Ostern usw.), die im Teil Ter¬ 
minbearbeitung angezeigt werden, können hier geändert 
oder ergänzt werden (z. B.Geburtstage). 

Paßwort ändern 

Hier kann das voreingestellte Paßwort »Test 0« geändert 
werden, wobei die 0 für User 0 steht. 

Superplan beenden 

Nach einer Sicherheitsabfrage wird die Arbeitszeit ange¬ 
zeigt, alle Dateien geschlossen und der Bildschirm auf die 
Standardwerte gesetzt. 

Um nun mit dem Programm Superplan arbeiten zu kön¬ 
nen, müssen folgende Schritte beim ersten Programmlauf 
eingehalten werden: 

Programm ’lnitplan.Bas’ abtippen und speichern. 
Programm ’Supplan2.Bas’ abtippen und speichern. 
Programm ’Supplan2.PGM’ abtippen und speichern. 
’lnitplan.Bas’ starten, damit alle benötigten Dateien ange¬ 
legt werden. ’SUPPLAN2.BAS’ starten und arbeiten. 
Alle weiteren Erklärungen ergeben sich aus dem Programm 
und den Abfrageformen. 

Viel Spaß und Erfolg beim Arbeiten mit Superplan V 2.0. 


Liebe Leser, 

das Programm Superplan wurde etwas kleiner gedruckt als übliche 
Listings. Wir hoffen jedoch, das diese Tatsache Sie nicht vom Abtip¬ 
pen dieses wirklich tollen und nützlichen Programmes abhält. Eine 
andere Alternative wäre das Splitten von Superplan auf zwei Heft¬ 
folgen gewesen, doch meinen wir, hier einen guten Kompromiß ge¬ 
funden zu haben. 


für 464-664-6128 


a 


io *************************************** 
************************************* 

20 ’** Initialisierungaprogramm z 

u SUPERPLAN V 1.0 ** 

30 '** <c) 1986 von Meyer 

Gunether ** 

40 ’************************************** 
************************************* 

50 HODE 2 

60 INK 0,13:INK l,O:B0RDER 13 
70 CLG 1 

80 HINDOW#1,2,79,2,24:PEN#1,1:PAPER#1,0=CL 
S#1 

90 LOCATESO,1,1 

100 PRINT CHR*(24);TAB(18);"INITPLAN - - 

- - - “ ;CHR*I164);“ 1986 von Meyer Guenth 
er";CHR$(24) 

110 PR I NT# 1: PR I NT# 1, 11 Dieses Programm rieh 
tet Ihnen alle Dateien ein, die von SUPERP 
LAN V 2.0 be-" 

120 PRINT#1," noetigt werden.“ 

130 PRINTSl," Normalerweise reicht die Spe 
»cherkapazitaet der Diskette fuer alle Pro 
gramme " 

140 PRINT#1," und Dateien aus." 

150 PR1NT#1,“ Sollten Sie dennoch Probleme 
bekommen, muessen Sie in HauptProgramm no 
ch in “ 

160 PRINTtl," Zeile 65 einen Diskettenuech 
sei einprogrammieren.'' 

170 PR1 NT# 1:PRINT#1,“ Legen Sie nun bitte 
IHRE DATENDISKETTE bzu ihre PROGRAHHDISKET 
TE ein.* 

180 PRINT#l,” Es werden nun alle benoetigt 
en Dateien automatisch angelegt." 

190 PRINTU1," Das Einrichten dauert etwa 3 
1/2 Minuten. Ruhen Sie sich etwas aus." 
200 PRINT# 1:PRINT# 1," Wenn Sie fertig sind 
, druecken Sie bitte eine Taste ..." 

210 CALL &BB06 
220 CLS#1 

230 PRINT#!:PRINT#1," Es wird nun die Date 
i SYSPARAH.DAT angelegt ... ’ 

240 OPENOUT "SYSPARAM.DAT" 

250 bord=13:stift=0:hint=13 
260 WRITE#9,bord,Stift,hint 
270 CLOSEOUT 

280 PRINT#1,CHR*(7);" Die Datei SYSPARAM.D 
AT wurde angelegt und initialisiert.“ 

290 PRINT#1," Es wird nun die Datei PASSHO 
RT.DAT angelegt ... " 

300 OPENOUT "PASSWORT.DAT" 

310 passuort*= "Test0" 

320 HRITE#9,Passwort* 

330 CLOSEOUT 

340 PRINT#1,CHR*(7);" Die PASSWORT.DAT - D 
atei mit dem PH ’TestO' wurde angelegt." 
350 PRINT# 1," Es wird nun die Datei ADRESS 
EN.DAT angelegt ... “ 

360 DIH adr*(100,2):heip*=" " 

370 OPENOUT “ADRESSEN.DAT“ 

380 FOR i=l TO 100 

390 adr#(i, 1)=he1p*:adr*(i,2)=help* 

400 HRJTE#9,adr*(i,1),adr®(i,2) 

410 NEXT i 
420 CLOSEOUT 

430 PRINT# 1,CHR*(7);" Die ADRESSEN.DAT - D 
atei wurde angelegt und initialisiert ..." 
440 PRINT#1," Es werden nun die 12 Termind 
ateien angelegt ..." 

450 RESTORE 680 
460 FOR i=l TO 12 
470 DIH term*(31,21) 

480 READ datei* 

490 OPENOUT datei* 

500 FOR k=1 TO 31 

510 READ feitag*:tera*(k,21)=feitag# 

520 FOR 1=1 TO 20 
530 term*(k,1>=" " 

540 HRITE#9,term*(k, 1) 

550 NEXT l 

560 HRITE#9,term*(k,21) 

570 NEXT k 
580 CLOSEOUT 

590 PRINT#l,CHR*(7)i” Die Datei ".datei*," 
wurde angelegt und initialisiert ...” 

600 ERASE term* 

610 NEXT 1 

620 PRINT#1," Es wurden alle benoetigten D 
ate ien angelegt." 

630 FOR i=l TO 20:PRINT CHR*(7):NEXT i 
640 PRINT#1," Bitte druecken Sie eine Tast 
e. Das Programm wird dann geloescht und Si 
e " 

650 PRINT#1," koennen das Programm SUPERPL 
AN V 2.0 starten. Viel Spass." 

660 CALL &.BB06 
670 ’ new 

680 DATA TERHIN01.DAT,Neujahr,,,,.Hl.Drei- 
Koenige,,,,,,,,,,,,,,,,,,,,,,,,, 

690 DATA TERHIN02.DAT,,Haria-Lichtmess.,,, 

,,,,,,,,Valentinstag,,,,,,,,,.. 

700 DATA TERM IN03.DAT... 

,,,,Maria-Verkuendigung,,,,,, 

710 DATA TERHIN04.DAT .. 
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137603 


C26323 

15133 
116803 
C2213 
C32923 

C6843 

159023 


124653 

197213 


C29323 
175033 


C68523 
154723 

[61203 

164683 


C3933 
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[40893 

(11773 
C14283 
(20823 
(9023 
[56283 

[60543 

(29143 
[6923 
C 14863 
(9023 
(62723 

(48583 

( 12803 
( 16173 
(3263 
[20573 
C16943 
C 3753 
(9023 
(50593 

(37203 

[7233 

[32)3 

(13043 

(9053 

[7383 

[10933 

( 17923 

(5253 

(10533 

[16363 

(368 3 

(18513 

C3733 

(9023 

(47333 

1457 3 
13753 
137503 

12028 3 
174023 


153873 

1393 3 
1 1493 
124513 

(41793 

(30783 
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720 DATA TERMIN05.DAT,Haifeiertag,.... 

.Mamertus,Punkratius,Servatus, 


730 DATA TERHIN06.DAT, ,,,,,,,,,,,,,,, ,Tag- 
der-Deutschen-Einheit,,,,,.Johannistag,,,, 
Siebenschlaefer,,Peter-und-Paul,, 

740 DATA TERM IN07. DAT.. , ... , , , , 


750 DATA TERMIN08.DAT,,,,,,,,Augsburger-Fr 
iedensfest,,Laurentius,,,,,Maria-Himme1fah 
rt,, 

760 DATA TERMIN09.DAT, .Maria-Geburt, 

i . i > i ......Michaelistag,, 

770 DATA TERHIN10.DAT,,,,,,,,,,,,,,,,,,,, , 
,Weltspartag,Reformatinsgedtg. 

780 DATA TERMINI 1.DAT,Allerheiligen,Allers 
ee len,,,,,,,,,Hart instag,. 

790 DATA TERMIN12.DAT, ,,.,,Nikolaus,.Maria 
-Empfaengnis,,,,,,,,,,,,,,,.Weihnachten, 1. 
Feiertag,2.Feiertag,,,,,Si1vester 


C27903 
[57433 

[22623 

C49443 

[46443 

[69503 


10 *************************************** [26323 

*xx*x*************x*x*%%x*xx*x**x*x** 

20 •*** Titelbild zu SU C18873 

PERPLAN V 2.0 *** 

30 *************************************** [26323 
************************************* 

40 ’ C1173 

50 HODE 1 [5063 

60 BORDER 13:INK 0,13:INK 1,0:INK 2,1'-INK [21913 

3,3 

70 PEN 1 [5493 

80 PLOT-1, 399:DRAM 633, 399,1:DRAW 639,-1 [111703 

:DRAM- 1,-1:DRAW-1, 399:PLOT-1, 359 = DRAM 63 
9, 359:PLOT 44, 388:DRAW 40, 392:DRAW 34, 

392:DRAW 28, 386=DRAW 28, 380:DRAW 32, 376 

:DRAW 38, 376:PLOT 40, 376:DRAW 44, 372 

90 DRAW 44, 366:PLOT 44, 366:DRAW 40, 362: [107773 

DRAW 32, 362: DRAW 28, 366: PLOT 52, 376--DRA 
W 52, 366:DRAW 56, 362:DRAW 62, 362:DRAW 6 
6 , 366--DRAW 66 , 376: PLOT 74, 376: DRAW 74, 

358:PLOT 74, 376:DRAW 84, 376:DRAW 06, 374 

100 DRAW 86 , 368:DRAW 84, 366:DRAW 76, 366 [115923 

:PLOT 98, 370:DRAW 104, 370:DRAW 106, 372: 

DRAW 106, 374:DRAW 104, 376:DRAW 98, 376:D 
RAW 96, 374:PLOT 96, 374:DRAW 94, 372:DRAW 
94, 364:DRAW 96, 362:DRAW 104, 362:PLOT 1 
14, 362 


110 DRAW 

1 14, 

376:PLOT 

114, 

372:DRAW 

l 18, 

C 117323 

376:DRAW 

120 , 

376:PLOT 

128, 

376:DRAW 

128, 


358:PLOT 

128, 

376--DRAW 

138, 

376:DRAW 

140, 


374:DRAW 

140, 

368:DRAW 

138, 

366:DRAW 

130, 


366:PLOT 

156, 

362:DRAW 

152, 

362:DRAW 

150, 


364 

120 DRAW 

150, 

392:PLOT 

178, 

362:DRAW 

176, 

[137743 

362:DRAW 

174, 

364:PLOT 

174, 

366:DRAW 

174, 


376:DRAW 

166, 

376:DRAW 

164, 

374:DRAW 

164, 


364:DRAW 

166, 

362:DRAW 

176, 

362--PL0T 

186, 


362:DRAW 

186, 

374:DRAW 

188, 

376:DRAW 

194, 


376 

130 DRAW 

196, 

374:DRAW 

196, 

362:PLOT 

222 , 

C94593 

390:DRAW 

230, 

364:PLOT 

232, 

364:DRAW 

240, 


390:PLOT 

254, 

386:DRAW 

258, 

390:DRAW 

262, 


390:DRAW 

266, 

390:DRAW 

270, 

386:DRAU 

270, 


380:DRAW 

256, 

364:DRAW 

270, 

364:PLOT 

270, 


364 

140 PLOT 

280, 

364:PLOT 

292, 

364:DRAW 

288, 

[102683 

368:DRAW 

288. 

386:DRAW 

292, 

390:DRAU 

302, 


390:DRAW 

306, 

386:DRAW 

306, 

368: DRAVf 302, 


364:DRAW 

294, 

364:PLOT 

50, 

294:DRAU 

130, 2 


94:DRAW 

130, 

198:DRAW 50, 198:DRAW 50, 294 


145 PLOT 

130, 

19B.-DRAWR 

9,9: 

DRAWR 0,82 

[11613 

150 PLOT 

202 , 

238:PLOT 

202 , 

238:DRAW 

130, 

[103753 


166:DRAW 186, 110:DRAW 258, 182:DRAW 202, 

238:PLOT 250, 230:DRAW 250, 230:DRAW 250, 

230:DRAW 250, 190:PL0T 250, 174:DRAW 250, 

134:DRAW 330, 134:DRAW 330, 230:DRAW 250, 

230 

160 PLOT 370, 142:DRAW 314 , 86 :DRAW 386, 1 [118283 

4:DRAW 442, 70:DRAW 370, 142:PL0T 67, 269: 

DRAW 77, 279:DRAW 97, 279:DRAW 107, 269:PL 

OT 107, 269:PLOT 107, 269:PL0T 107, 269:DR 

AW 107, 254:PLOT 107, 255:DRAW 67, 215 

170 DRAW 67, 210=DRAW 102, 210:DRAW 107, 2 [132903 


200:DRAW 222, 200:DRAW 172, 
215:DRAW 277, 215:DRAW 287, 
195:DRAW 277, 185:DRAW 267, 
185--DRAW 287, 175: DRAW 287, 


10:PLOT 197, 

50:PLOT 267, 

05:DRAW 287, 

85: PLOT 277', 

60 

180 DRAW 277, 150:DRAW 267, 150:PL0T 302. [93491 

200:DRAW 317, 215:DRAW 317, 150:PL0T 332, 

85:DRAW 342, 95:DRAW 352, 95:DRAW 362, 85: 

DRAW 362, 75:DRAW 352, 65:PL0T 362, 75:DRA 
W 372, 75:DRAW 387, 60:DRAW 387, 50:DRAW 3 
77, 40 

190 PLOT 402, 65:DRAW 392, 65:DRAW 362, 95 [66233 
:DRAW 362, 105:DRAW 372, 115:DRAW 382, 115 
: DRAW 407, 90:PL0T 407, 90:DRAU 412, 85--DR 
AW 412, 75:DRAW 402. 65 

200 PEN 2:LOCATE 24,2:PR INT CHRX 164) : • 19 [27493 


— WEB — 

Die 20 MB WINCHESTER-EXPANSION-BOX für JOYCE 
DRIVE ACESS TIME 15 msec.DATA TRANSFER RATE 5 MB/sec. 
DIRECTORY ENTRIES 2048 CHANNEL C, D, M 3 OPTIONS 
Controller, Netzteil, Konsole, Software 
QUICK-DATA WEB 

Das erste GSX-Geschäftsprogramm speziell für Festplattenbetrieb 
und max 18 MB Datenbank 
für die Probleme des Versandgeschäftes 
(NN-Paket/NN-Päckchen/NN-Brief) 
mit Standards ITOH Serie 8510 BP SP BINDER MFP 6000 


QUICK-CALC 2 1 

Buchhaltung 

148 DM 

QUICK-CLAC PLUS 

Erweiterte Buchhaltung 

178 DM 

QUICK-BILL 2 0 

Angebot, Rechnung 

168 DM 

QUICK-NAME 2.0 

Adressverwaltung 

128 DM 

QUICK-NAME PLUS 

Adressen/Serientexte 

159 DM 

QUICK-CINE 2 0 

Videoarchiv 

98 DM 

QUICK-DATA 30 

Geschäflssoftware GSX™ 

228 DM 

QUICK-DATA WEB 

nur Festplattenbetrieb 

498 DM 

KIT PC8256/TMS 

512KB RAM-Erweiterung 

99 DM 

DISK DRIVE 1MB 

Laufwerk für JOYCE 

564 DM 

FILTER 

Bildschirmfilter 

79 DM 

PAPIERFUHRUNG 

für JOYCE Drucker 

39 DM 

SUPERTYPE 

Schriftarten f.LocoScript 

p.A. 

LocoMail 

Mail Merge f V 1 21 

p.A. 

LIGHT-PEN 

incl. Software 

p A 

MOUSE 

komp DIGITISER/DR DRAW 

p A 

DlGITISER 

komp MOUSE/PEN 

p A 

WINCHESTER 

Expansion Box, 20 MB 

p A 

FAX-ADAPTOR 

Telefax, Telex 

p A 


weitere Soft- und Hardware in unserer Übersicht 


Fordern Sie unser Info-Material an! 

Fa. WERDER - Nachrichtentechnik 

Sprechzeiten Mo-Fr: 9-11/14-16 Uhr 

Bramfelder Ch. 215 / 2 Hamburg 71 / (0 40) 641 1779 



Franzis’ 

FACHBÜCHER 


Schneider CPC: Dateiverwal¬ 
tung 

Eine Software-Sammlung. Von 
L Miedel. Ca. 184 S., ca. 11 
Abb., Lwstr-kart. DM 38,-. 

= FCB Band Nr. 16. 

ISBN 3-7723-8691-1 
Das Verstehen umfangreicher 
Programme steht im Vorder¬ 
grund dieser Software-Samm¬ 
lung. Mit dem vorliegenden 
Buch hält der Leser eine aktuel¬ 
le Trickkiste für seinen CPC in 
der Hand. 


Das große CPC-Arbeitsbuch 
Eine aktuelle und praktische 
Anleitung, das Optimale aus 
den Schneider-Computern her¬ 
auszuholen - für CPC 464,664 
und 6128. Von L. Miedel und 
M. Kotulla. 453 S., 30 Abb., 
Lwstr-kart. DM 68,-. 

ISBN 3-7723-8421-8 
Die zahlreichen Demonstra- 
tions- und Hilfsprogramme ver¬ 
mitteln ein Wissen, das es in 
sich hat. Dabei werden Pro¬ 
gram mtricks präsentiert, die 
erst so richtig zeigen, was in 
den CPCs alles steckt und durch 
geschicktes Programmieren 
aus ihnen herausgeholt werden 
kann. 


Franzis-Verlag GmbH 

Karlstraße 37-41 
8000 München 2 
Telefon 5117-1 
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[—Programm 


86 by H 

G. " 




210 PLOT 

360, 340:DRAW 

620, 340:DRAW 

820, 

[10184] 

190;PLOT 

620, 190:PLOT 

620, 190:DRAW 

360, 


190:DRAU 

360, 340:PLOT 

360, 320:DRAW 

620, 


320 t PLOT 

490, 340:DRAW 

490, 190:PLOT 

370, 


334;DRAM 

378, 334:PLOT 

375, 333:DRAW 

375, 


327 





220 PLOT 

388, 327:DRAW 

384, 327:DRAW 

384, 

C12815] 

330 t DRAU 

386, 1 330:DRAW 

385, 330:DRAW 

385, 


334;DRAW 

388, 334:PLOT 

394, 327:DRAW 

394, 


334:DRAH 

398, 334:DRAW 

399, 333:DRAW 

399, 


331:DRAW 

398, 331:DRAW 

398, 331:DRAW 

396, 


331 





230 DRAW 

400, 327:PLOT 

407, 327:DRAM 

407, 

C 14141] 

334:DRAW 

410, 331:DRAW 

413, 334:PLOT 

414, 


334:DRAW 

414, 327:PLOT 

420, 327:DRAW 

420, 


334:PLOT 

426, 327:DRAW 

426, 334:DRAW 

432, 


327;DRAW 

432, 334:PLOT 

443, 334:DRAW 

438, 


334 





240 DRAW 

438. 331:DRAW 

440, 331:DRAW 

439, 

CI 1695] 

331:DRAW 

439, 327:DRAW 

442, 327:PLOT 

372, 


307:DRAW 

477, 307:PLOT 

477, 297:DRAW 

372, 


297:PLOT 

372, 287: DRAW 

412, 287:PLOT 

372, 


272:DRAW 

442, 272:PLOT 

467, 262:DRAW 

372, 


262 





250 PLOT 

372, 212:DRAW 

447, 212:PLOT 



202:DRAW 

372, 202:PLOT 

417, 247:DRAW 



247:DRAW 

427, 232:DRAW 

417, 247:PLOT 



227:DRAW 

422, 222:DRAW 

427, 217:DRAW 



222:DRAW 

427, 227:PLOT 

502, 307:DRAW 

607, 


260 PLOT 

607, 297:DRAW 

502, 297:PLOT 

502, 

C 12074] 

287:DRAW 

607, 287:PLOT 

607, 277=DRAW 

502, 


277:PLOT 

502, 267:DRAW 

557, 267:PLOT 

507, 


242:DRAW 

587. 242:PLOT 

582, 232:DRAW 

507, 


232:PLOT 

507, 202:DRAW 

612, 202:PLOT 



332 





270 DRAW 

612, 332:DRAW 

612, 327:DRAW 

502, 

C 10521] 

327:DRAW 

502, 332:PLOT 

361, 190:DRAW 

366, 


185:DRAW 

486, 185:DRA W 

491, 190:DRAW 



185:DRAW 

616, 185:DRAW 

621, 190:PLOT 



185:DRAW 

471, 165:DRAW 

476, 160:DRAW 



185 





280 PEN 2 

:LOCATE 4,7:pRINT STRING$< 6 , 

CHR* 1 


143) ) :PE1 

1 




290 PEN 3 

:LOCATE 2,24:PRINT "Einen Homent 

C2183] 

bitte ... 

" 




310 RUN ' 

supplan 2 .pgm" 



C1529] 

10 •fr************************************* 

C 26323 

************************************* 


20 '** 


S U P E R P i 

A N 

C1113] 

V 2.0 


** 


30 '** 


(c) Januar 

C1054] 

1987 


** 
















50 '** 

Author: Hayer, GOnther Hessin 

C3932] 

gstra'e 

8901 KNnigsbrunn ** 


60 ’************************************** 

C2632] 

************************************* 


70 ON ERROR GOTO 7140 



C 1350] 

80 ON BREAK GOSUB 7180 



C912] 

90 GOSUB 

7230 



C861 ] 

100 OPENOUT "dumny" : MEMORY HI HEM-1 : CLOSEOU 

C2303] 

110 OPENIN “SYSPARAM.DAT” : INPUT#9,bord,sti 

[ 3594 3 

ft,hinttCLOSEIN 




120 DIH ionat$( 12) 



C583] 

130 FOR 

=1 TO 12 



[321] 

140 READ 

monat® ( i ) 



C837] 

150 NEXT 

i 



C375] 

160 DATA 

Januar,Februar 

,MCrz,Apri 1 ,Ha 

i, Jun 

C3071 ] 

i,Jul 1 ,August 




170 DATA 

September,Oktober,November, Dezemb 

C23223 

180 FOR 

= 1 TO 7 



C 447 ] 

190 READ 

uoch® ( i ) 




200 NEXT 

i 



C3753 

210 DATA 

Sonntag,Hontag,Dienstag,Hittuoch, 

C 4982 ] 

Donnerstag,Fr e itag,Samstag 



220 zab=18:zeisa®=“DEUTSCH " :zei1=60:nlq®=" 

C5979] 

AUS“ :papm*="PR~FEN" : ustr$="AUS" 



230 WIDTH 

80 



C8583 

240 '** B 

ildschirm init 

ialisieren ******** 

C327 1 ] 

************************************* 



250 BORDER bord:INK 0,hint:INK l,stift:HOD 

C34463 

E 2 





260 WINDOW#!,1,80,1,1:WIND0W#2,1,80,2 

, 2 : WI 

[36023 

ND0W#3,2, 

79,3,23:WINDOW#4,1,80,24,25 



270 PEN# 1 

,0:PEN#2,0:PEN#4,0:PAPER#1,1 

: PAPE 

C49363 

R#2,1:PAPER#3,0:PAPER#' 

, 1 



280 CLS#1 

: CLS#2 : CLS#3 : CLS#4 


C17693 

290 ORIGIN 0,0:DRAWR 0, 

369, 1 


[883] 

300 HOVER 

1,0:DRAWR 0,- 

369 


[ 13903 

310 HOVER 

637,0 : DRAWR 

,369 


C 18103 

320 HOVER 

1,0:DRAWR 0, 

369 


[ 13903 

330 ’** Ausgabe Kopf ********************* 

C36923 

************************************* 



340 LOCATE#1,7,1:PRINT#1,"S U P E R P 

L A 

[42263 

N V 2.0 

"iCHR®(164 > ;“ 1986 "i 



350 LOCATE#1,60,1:PRINT#1,"FREE BYTES 

: " ; : 

[35903 

PRINT#1,USING “#####"; FREtO)i 



360 EVERY 

1000.1 GOSUB 

6970 


[11623 


370 LOCATE#4,3, 1:PRINT#4,“H\chten Sie eine 
kurze ErklCrung zum Programm SUPERPLAN 2. 
0 haben ? (j/n)" 

C64393 

380 CALL &BB06 

C393 3 

390 IF INKEY(46)=0 THEN 420 

C6663 

400 IF INKEY(45)=0 THEN GOSUB 6260 

C 1050] 

410 GOTO 370 

C4663 

420 CLS#2:CLS#3:CLS#4 

C588] 

430 ’ 

[1173 

440 ’** Datumseingabe ******************** 
************************************* 

C33553 

450 CLS#4:L0CATE#4,5, 1 :PRINT#4,"Geben Sie 
nun bitte das aktuelle Datum im Format TTH 
HJJ ein: » ; INPUT#4,dat*:CLS#4 

[79133 

460 IF LEN(dat ®!>6 THEN L0CATE#4,30,1:PRIN 
T#4,CHR®(7);“Falsche Eingabe ! " : FOR s=l TO 
1500:NEXT s:GOTO 450 

[62710 

470 day=VAL!LEFT®(dat$,2)) 

[ 1091] 

480 monat=VAL(HID*(dat®,3, 2 )) 

C2457] 

490 jahr=VAL(RIGHT*(dat*,2))+1900 

[ 17403 

500 IF day< 1 OR day>31 GOTO 550 

[ 1551] 

510 IF monat=2 AND (jahr-1900) HOD 4 <>0 A 
ND day> 2 B THEN 550 

C38543 

520 IF monat =2 AND (jahr-1900) HOD 4 =0 AN 
D day>29 THEN 550 

[29293 

530 IF monat=4 AND day>30 OR monat =6 AND d 
ay>30 OR monat=9 AND day>30 OR monat=ll AN 
D day>30 THEN 550 ELSE 560 

C5718] 

540 IF monat=l OR »onat=3 OR monat=5 OR mo 
nat=7 OR monat =8 OR monat=10 OR monat=12 A 
ND day>31 THEN 550 ELSE 560 

[59433 

550 CISS4:L0CATE#4,25,1:PRINT#4,CHRS(7 ) ; "F 
alscher Tag eingegeben !":FOR s=l TO 1500: 
NEXT s:GOTO 450 

[59783 

560 IF monat>= 1 AND monat<=12 GOTO 500 

C20253 

570 CLS#4:LOCATE#4,25,1:PRINT#4,CHR*(7)i"F 
alscher Honat eingegeben !“:FOR s=l TO 150 
0:NEXT s:GOTO 450 

C6133] 

580 IF jahr<2000 AND jahr>1900 GOTO 600 

[2069] 

590 CLS#4:LQCATE#4,25,1:PRINT#4,CHR*(7) ; "F 
alsches Jahr eingegeben !":FOR s=l TO 1500 
tNEXT s:GOTO 450 

C7887] 

600 k=INT(0. 6 +(1/monat)):l=jahr-k:o=monat+ 
12 *k:p=l /100 

C3084] 

610 2 1=1 NT(p/4):z2=INT(p):z3=INT((5*1)/4 ) : 
z4=INT(13*(o+ 1 )/5) 

C 3747 3 

620 z=z4+z3-z2+z1+day -1 : z=z-< 7*1NT( z/7)l + l 

C1338] 

630 L0CATE#2,39, 1:PRINT#2,uoch*(z);" ":day 
i." “ ;monat®( monat); jahr ; 

C38063 

640 ’** Zeiteingabe ********************** 
************************************* 

C34923 

650 CLS#4:L0CATE#4 ,6,1: PRINT#4,“Geben Sie 
nun bitte die aktuelle Zeit im Format SSHH 
ein:"i:INPUT# 4,ze i t ® 

C76973 

660 CLS#4 

C3863 

670 IF LEN(ze i t* ! >4 THEN 720 

C 1066] 

680 stunde=VAL(LEFT*(zeit®,2!):minute=VAL( 
RIGHT®< ze 11 ®,2)) 

C42793 

690 IF stunde<0 OR stunde>24 THEN 720 

[ 15193 

700 IF minute<0 OR minute >59 THEN 720 

[23863 

710 GOTO 730 

[427] 

720 L0CATE#4,30,1:PRINT#4,CHR*(7)i"Falsche 
Zeitangabe !":FOR s=l TO 1500:NEXT s:G0T0 
650 

[4427] 

730 L0CATE#2,69,1:PRINT#2,“Zeit: ";:PRINT# 
2 , USING “##:## "; stunde '.minute 

C40723 

740 EVERY 3000,3 GOSUB 6710 

[364 3 

750 std=stunde:ainu=minute 

[20413 

760 ’** Passuorteingabe ****************** 
************************************* 

[38043 

770 prob=0 

[566] 

780 CLS#3 : CLSB4 

C6953 

790 PRINT#4,TAB(10) ; “Geben Sie nun bitte I 
Hr PASSWORT ein ! (XXXXXXXZ)“; 

C58210 

800 PRINT#4,CHR®(21 ): INPUT#4,passt® : PRINT# 
4,CHR® ( 6 ):CLS#3 

[4196] 

810 GOSUB 6770:prob=prob+I 

[ 14813 

820 IF prob>3 THEN END:’ Hier kann NEW ein 
gefuegt werden 

[38903 

830 CLS#4 

C3863 

040 IF ok =1 THEN GOTO 860 ELSE PRINT#4,TAB 
(30);CHR®(7)i"FALSCHES PASSWORT !":FOR i=l 
TO 500: NEXT üGOTO 780 

C75813 

850 ’** Hauptmenlausgabe ***************** 
************************************ 

[33823 

860 L0CATE#2, 1, 1 : PRINT#2,SPACE* ( 38 ); :CLS#3 
: CLS#4 

C31713 

870 meld*="H AUPTHENUE“ 

C 1604] 

880 L0CATE#2,1,1:PRINT#2,TAB( ! 38-LEN ( meld* 

1 >/ 2 );meld$; 

C43853 

890 L0CATE#3,8,4:PRINT#3, "( 1) TERHINBEARBE 
ITUNG":PRINT#3 

[26563 

900 PRINT#3, TAB( 8) ; 11 ( 2 ) KALENDER ANZEIGEN" 
:PRINT#3 

C31113 

910 PRINT#3,TAB(8 ):"( 3 ) DRUCKERPARAHETER" : 
PRINT#3 

£36253 

920 PRINT#3,TAB(8)i“(4) ADRESSVERWALTUNG ”: 
PRINT#3 

£34693 

930 PRINT#3,TAB(8 ) i "(5) SYSTEHPARAHETER ": P 
RINT#3 

C28253 

940 PRINT#3,TAB(8) ; "( 6 ) KALENDER ANPASSEN" 

: PRINT#3 

C26233 

950 PRINT#3,TAB(8> ;“(7) PASSWORT NEU/<NDER 
N" : PRINT#3 

C25543 

960 PRINT#3,TAB( 8 );CHR® ( 24)i"(8 ) SUPERPLAN 
BEENDENCHR*(24 ): PRINT#3 

[3648] 

970 CLS#4 

C3863 

980 a*=INKEY*:IF a*="“ THEN 980 

C1092] 

990 IF INKEY ( 13)=0 THEN GOTO 1090 

[7713 

1000 IF INKEY ( 14)=0 THEN GOTO 2460 

£9403 
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Programm—1 


1010 IF INKEY 15)=0 THEN GOTO 2760 C13633 

1020 IF INKEY(201=0 THEN GOTO 3400 C12023 

1030 IF INKEY«12)=0 THEN GOTO 4490 C16393 

1040 IF INKEY(4>=0 THEN GOTO 5260 £13813 

1050 IF INKEY«101=0 THEN GOTO 5740 C13493 

1060 IF INKEY«111=0 THEN GOTO 6050 C10543 

1070 GOTO 860 £5363 

1080 ’** TerBinbearbeitung *************** £43653 

************************************* 

1090 CLS#3:CLSN4: DIH ter■*(31,211 £16863 

1100 ■eld*="T ERHINBEARBEITU £22623 
N G“ 

1110 L0CATEN2,1,1 :PRINT#2,TAB((38-LEN(neld £41683 
*> )/2>i*eld# 

1120 FOR i=i TO 1000:NEXT £7413 

1130 ORIGIN 1,352 £2753 

1140 HOVER 57,16:DRAUR 0,-351 £12413 

1150 L0CATEN3, 1, 1:PBINT#3,CHR*<24>;"TERHIN £31363 
"+STRING*(72," ");CHR»(24): 

1160 CLS#4:PRINT#4,TAB!15);"ENTER = aktuel £72263 
lar Honat (01-12) = andorar Honat": 


PRINT#4,TAB(2S>:"Ihre Wahl bitte: “;tINPUT 
»4,lad» 


1170 IF lad»=“" THEN 1200 £12093 

1180 IF VAL«lad»><10 THEN lad»="0"+lad» £20553 

1190 IF VAL« lad»)> 12 OR VALUad*Kl THEN 1 £34563 
160 ELSE 1210 

1200 lad»=HID*(dat»,3,2) £8723 

1210 dato i *= "TERH1N • + lad»+ *. DAT": day l=day •• £15733 
aand=0 

1220 L0CATEN3,1.2 £6703 

1230 FOR n=l TO 20 £9083 

1240 READ aa» £4843 

1250 DATA 0700,0730,0800,0830,0900,0930,10 £21633 
00,1030,1100,1130 

1260 DATA 1200,1300,1330,1400,1430.1500,15 £25343 
30,1600,1630,1700 

1270 PRINTS3,aa»:NEXT n £10953 

1280 RESTORE 1250 £7493 

1290 CLS#4:PRINTN4,TAB(28);"Einen Hoaent b £22573 


itte ... * 

1300 GOSUB 2260 £8713 
1310 L0CATEN3,1,2 £6703 
1320 GOSUB 2350 £0213 
1330 CLS#4 £3863 


1340 PRINT#4,TAB< 12);CHR*(242)iCHR*(243):“ £70303 
= VOR/ZUR~CK T = TERHIN setzen "» “ L 


= TERHIN l\schen " 

1350 PRINTN4,TAB(16)i"D = Drucken “;" A = £35673 
ALARH ein/aus " • 11 ENTER = Ende“; 

1360 «ah1*=INKEY*:IF wahl*=““ THEN 1360 £20093 

1370 IF INKEY«1)=0 AND dayl< 31 THEN dayl= £22493 
day 1 + 1:GOTO 1310 

1380 IF INKEY(8)=0 AND dayl> 1 THEN dayl=d £23603 
ay1-1:GOTO 1310 

1390 IF INKEY«18)=0 THEN 1450 £3333 

1400 IF INKEY(51)=0 THEN 1590 £9723 

1410 IF INKEY(36)=0 THEN 1850 £11213 

1420 IF INKEY(61)=0 THEN GOTO 2130 £19363 

1430 IF INKEY(69)=0 THEN GOSUB 2020 £20853 

1440 GOTO 1330 £4463 

1450 IF aend=0 THEN 1560 £10783 

1460 PRINT#4,TAB(8);"Die Teraine werden ak £59413 

tuallisiert. Bitte einen Hoaent warten ... 


1470 OPENOUT datei* £7383 

1480 FOR i=l TO 31 £3103 

1490 FOR k=1 TO 21 £10993 

1500 HRITE#9.tera*<i.k> £16103 

1510 NEXT k £3733 

1520 NEXT i £3753 

1530 CLOSEOUT £9023 

1540 loesch»="*.BAK“ £10413 

1550 !ERA,Sloesch* £8933 

1560 ERASE tera* £4573 

1570 GOTO 660 £5363 

1580 •** Teraine setzen ****************** £39883 

************************************* 

1590 x=5.y=2:aend=l £11363 

1600 L0CATEN3,x,y:PRINT#3,CHR»(247); £16633 

1610 CLS#4 £3863 

1620 PRINT#4,TAB(20);CHR*(240);CHR»(241>+” £43853 
= ZEIT wEhlen ";" ENTER = eingeben" 

1630 uah1*=INKEY*:IF wahl»=“" THEN 1630 £22023 

1640 IF INKEY(2)=0 AND y<21 THEN GOSUB 175 £11703 
0 

1650 IF INKEY(0)=0 AND y>2 THEN GOSUB 1800 £19793 
1660 IF INKEY«18>=0 THEN 1670 ELSE 1630 £7503 


1670 CLS#4:PRINTN4,“ Geben Sie nun bitte £57983 
Ihren Teraintext Bit h\chstens 60 Stellen 
ein ! * 

1680 INPUTN4,"TERHINTEXT: *:tera*( day 1 ,y-1 > £24403 
1690 IF LEN« tera» (day1,y-1>)<=60 THEN 1710 £16493 
1700 CLS#4:PRINT#4,CHR*(7);TAB(25);“TERHIN £55833 
TEXT ZU LANG !“:FOR i=l TO 500:NEXT i:GOTO 
1670 


1710 GOSUB 2350 £8213 

1720 L0CATE#3,x,y:PRINTN3,* ■; £10023 

1730 CLS#4:GOTO 1330 £13173 

1740 '** Zeit wChlen ********************* £35893 
************************************* 

1750 L0CATE#3,x,y:PRINT#3," £10023 

1760 y=y+l £8093 

1770 L0CATES3,x,y:PRINT#3,CHR*(247); £16633 

1780 RETURN £5553 

1790 •** Zeit uChlen ********************* £35893 
************************************* 

1800 L0CATEN3,x,y:PRINT83,“ £10023 

1810 y=y-1 £7733 

1820 LOCATE#3,X,y:PRINT#3,CHR*(247); C18633 


Die Vorteile 
liegen klar 

«ul A 
° u 



Computerschulung bei Leidinger & Haupenthal 
★ ★ ★ Joyce Trainingsseminare ★ ★ ★ 

Lerninhalle: - Einführung In die Arbeitsweise von LOCOSCRIPT 

— Besonderheiten und Logik von LOCOSCRIPT 

u a Arbeiten mit Grundschablonen, Erstellen von Layouts, 

Seitendefinitionen und Seitenzählung usw. 

- Handhabung der Adressverwaltung LOCOMAIL 

- Problemlösung der Formularbearbeitung 

Seminarorte: Von Febt-Mai 87 werden in insgesamt 35 Städten der BRD 

Seminare durchgeführt 

Empfehlung; Von 26 Seminaren, die 1986 in Deutschland und Österreich durchgetührt wur¬ 
den, beurteilten die Teilnehmer 15 Seminare mit der Note »sehr gut« und 11 
Seminare mit der Note »gut« (Insgesamt waren 6 Beurteilungsstuten möglich) 

Gratisinformationen bei: Computerschulung Leidinger & Haupenthal 
Karl-Dlehl-Str. 2,6696 Monnweller 
Tel. (06873)7574 

Weitere Angebote: Respekt vor dem Computer??? Dann besuchen Sie unser Seminar 
»DAS 1x1 DES COMPUTERS« 


Muß gute Software 
viel kosten? 

Software muß nicht teuer sein! Wenn Sie bisher viel Geld für Program¬ 
me ausgegeben haben, die dann doch nicht Ihren Vorstellungen ent¬ 
sprachen, haben wir ein tolles Angebot für Sie: Public-Domain-Software 
für CP/M aus den USA. Nur bei uns bekommen Sie diese Programme 
und die mitgelieferten Dokumentationen in deutscher Sprache - ga¬ 
rantiert lauffähig auf Ihrem Schneider-Computer: 

Pascal-Compiler JRT-Pascal - erfüllt 
alle Anforderungen von Standard-Pascal 

Assembler-Paket mit Z80-Assembler, Linker 
und intelligentem Disassembler 

Künstliche Intelligenz - Interpreter für LISP und 
PROLOG 

C-CompilerSmall-C - verarbeitet sogar Fließ¬ 
kommazahlen 

Forth-83 - sehr vollständige Implementation der 
Sprache Forth 

CP/M-Hilfsprogramme wie SO (komprimiert 
Dateien bis 60%), Diskettenmonitor u.v.a. 
JRT-Pascal und Small-C benötigen auf dem CPC-464/664 eine Spei¬ 
chererweiterung (64K genügen), LISP ebenfalls, PROLOG hingegen 
nicht. Auf Joyce und CPC-6128 ohne Erweiterung. Alle anderen Pro¬ 
gramme laufen auch in der Grundversion des Computers. Disketten 1-4 
mit WordStar-kompatiblem Editor. 

Jede Diskette kostet sage und schreibe nur 30 Mark. Bitte geben Sie 
an, ob Sie eine 3-Zo!l-Diskette oder eine 5.25-Zoll-Disk (Vortex-Format) 
wünschen. 

Lieferung per Nachnahme oder Vorauskasse. Keine Versand- oder Ver¬ 
packungsgebühren! 

MARTIN KOTULLA 

Grabbestraße 9, 8500 Nürnberg 90, 
Telefon: 0911/303333 


Diskette 

1: 

Diskette 

2; 

Diskette 

3: 

Diskette 

4: 

Diskette 

5: 

Diskette 

6: 
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I Programm 


1830 

RETURN 

£5553 

1840 

'** Termin loeschen ***************** 

£32031 

************************************* 


1850 

x=5:y=2:aend=l 

£11361 

1860 

L0CATES3,x,y:PRINTtt3,CHR*(247); 

£ 1683) 

1870 

CLStt4 

£386) 

1880 

PRINT#4,TAB(20) ;CHR* (240 ) ; CHR* (24 1) ; 11 

£4341) 

= ZEIT uaehlen ENTER = l\schen" 


1890 

uah1*=INKEY*:IF uahl*="" THEN 1890 

£2067) 

1900 

IF INKEY(2)=0 AND y<21 THEN GOSUB 175 

£1170) 

1910 

IF INKEY(0)=0 AND y>2 THEN GOSUB 1800 

£ 19793 

1920 

IF INKEY(18)=0 THEN 1930 ELSE 1890 

C855) 

1930 

CLS#4:PRINT#4,TAB(10);tern*(day1,y-1) 

£ 14283 

1940 
n) ?" 
1950 

PRINTtt4,TAB(30);"WIRKLICH L3SCHEN (j/ 

£30003 

wahl*=INKEY®:IF uahl*="“ THEN 1950 

£20673 

I960 

IF INKEY(45)=0 THEN 1970 ELSE 1850 

£ 1164) 

1970 

terutlday1,y-1)=“ * 

£13013 

1980 

GOSUB 2350 

£8213 

1990 

LOCATE#3,x,y:PR INTtt3," 

C1002) 

2000 

CLStt4:GOTO 1330 

£ 1317) 

2010 

’** Alarm setzen ******************** 

£44103 

************************************* 


2020 

CLSS4:alarm 1=0:alarm2=0 

£ 15773 

2030 

PRINTtt4,TAB!3);"Wann soll alarmiert u 

£43713 

erden 

? " 


2040 

INPUTS4,“ Bitte in der Form XXXX ein 

C47173 

geben 

: " ialarm* 


2050 

IF alarm*= 11 • THEN RETURN 

£ 1027) 

2060 

IF LENlalarm*) >4 OR VAL(RIGHT*lalarn* 

£43293 

,2)1>60 OR VAL (alarm*)>2400 THEN 2070 ELS 
E 2090 


2070 

CLS#4:PRINTtt4,TAB(30);CHR*(7);"FALSCH 

C2132) 

E EINGABE" 


2080 

FOR i=l TO 500:NEXT i:GOTO 2020 

C 16313 

2090 

alarml=VAL(LEFT#(alärm®,2)):alarm2=VA 

£27983 

L(RIGHT*(alarm*,2)) 


2100 

EVERY 1000,2 GOSUB 7000 

E 13743 

2110 

RETURN 

£5553 

2120 

’** Terminplan drucken ************** 

£40623 

************************************* 


2130 

CLStt4 

£3863 

2140 

PRINTttB,STRING*(80,"=") 

£ 1294 3 

2150 

PRINT#8,TAB18!;CHR*(14);"TERMINPLAN v 

£51273 

Ol " 

day 15 "5 1 ad* i 11 . *; jahr ;CHR» ( 20) 


2160 

PRINTttB,STRING»(80, “=») 

£ 1294 3 

2170 

PRINT#8 

£343 3 

2100 

FOR m=l TO 19 

£5733 

2190 

READ ma* 

£4843 

2200 

IF teri» 1 day 1, m ) = “ 11 THEN PRINT#8,ma* 

£30673 

;TAB(6);STRING*(60,"):GOTO 2220 


2210 

PRINTS8,ma*;TAB(6);term*(day 1,m) 

£24543 

2220 

NEXT n 

£3713 

2230 

RESTORE 1250 

£749 3 

2240 

GOTO 1330 

C4483 

2250 

’** Einlesen Termindatei ************ 

C 14093 

************************************* 


2260 

OPENIN datei* 

£8773 

2270 

FOR i=l TO 31 

£3103 

2280 

FOR k=1 TO 21 

£ 1099 3 

2290 

INPUT#9,term®(i, k) 

£ 1234 3 

2300 

NEXT k 

£3733 

2310 

NEXT i 

£3753 

2320 

CLOSEIN 

£7523 

2330 

RETURN 

£5553 

2340 

’** Termine ausgeben **************** 

£3905) 

************************************* 


2350 

CLS#4 

£386) 

2360 

LOC ATEtt3,30, 1:PRINT#3,CHR*(24 ) ; “ 

£28613 


“iCHR®(24 ) 


2370 

LOCATEtt3,32,1:PRINT#3,CHR*(24);term*( 

£26583 

day 1 

21);CHR*(24) ; 


2390 

L0CATEtt3, 9,1 :PRINTtt3,CHR*(24 ) ;day 1 i “ 

£33723 

. 11 ;monat*(VAL! lad®) ) ; jahr ;CHR* (24 ) ; 


2390 

FOR 1=1 TO 20 

C 3 13 3 

2400 

LOCATEttS,12,i+1 

£6983 

2410 

IF term#(day 1,i) =" " THEN PRINT#3,STR 

£ 17913 

ING#(60,CHR*(144)); 


2420 

PRINT#3,term®(day 1,i ); 

£3213 

2430 

NEXT t 

£3753 

2440 

RETURN 

C 555 3 

2450 

’** Kalender anzeigen *************** 

£39033 

************************************* 


2460 

CLS#3:CLS#4:ge=3 

£7013 

2470 

N“ 

2480 

meld*="K ALENDER ANZEIGE 

£23383 

L0CATE#2,1,1:PRINT#2,TAB((38^L£N(meld 

£41683 

*1 )/2);meld* 


2490 

CLS#4:PRINT#4,TAB(9);“Monat angezeige 

C52223 

n = 

(1-12) ENTER = Ende D = Druc 


2500 

PRINT#4,TAB(25);"Ihre Wahl bitte 

£36323 

INPUTtt4,uah1®:IF wahl*="“ THEN 860 


2510 

IF UPPER*(LEFT*(Uah1®,1)) = "D" THEN ge 

£22113 

=6 ELSE ge=3 


2520 

uahl=VAL(RIGHT*(uahl*,2)) 

C 164B3 

2530 

IF wähle 1 OR uah1>12 THEN 2490 

£ 13403 

2540 

IF uah1=2 AND (jahr-1900) HOD 4 <>0 T 

C 19973 

HEN 

maxtag=28 


2550 

IF uah1=1 OR uah1=3 OR uahl=5 OR wähl 

£50063 

=7 OR uah1=6 OR uahl=10 OR uahl=12 THEN na 


xtag 

=31 


2560 

IF uah1=4 OR uahl=6 OR uahl=9 OR uah) 

£3315) 

= 11 

THEN maxtag=30 


2570 

CLS#3 

£3713 

2580 

PRINTttge 

£7993 

2590 

PRINTttge.TAB(12);CHRS(24)i" MONAT 
;CHR»(24);“ " imonat®(uah1);“ “;jahr 

£4485) 

2600 

PR INTtt3:L0CATE#3, 1,4 

C 17053 

2610 

PRINTttge,“ Hontag Dienstag Hittwo 

£94153 


ch Donnerstag Freitag Samstag Sonnta 
6 " 

2620 k=INT(0. 6 +(1/wahl)): 1 =jahr-k:o=wah1+1 £23813 
2 *k=p= 1/100 

2630 zl=INT(p/4):z2=INT(p):z3=INT(<5*1>/41 £37473 
:z4=lNT<l3*lo+l)/5) 

2640 z=z 4 +z 3 - 22 +zl+l-l:z=z-( 7 *INT(z/ 7 ))+l C22343 

2650 m= 6 :ZONE 11:IF z=l THEN z=z*11+56 ELS C 16913 


E z=z*ll-21 

2660 L0CATE#3,z,a £6673 

2670 IF ge =8 THEN PRINT# 8 ,TAB(z) [8333 

2680 FOR i=l TO naxtag £3493 

2690 z=z+10 £5893 

2700 IF Z>78 THEN z=10:PR3NT#ge £16393 

2710 PRINTttge, i, C 11563 

2720 NEXT i £3753 

2730 PRINTttge £7993 

2740 CLS#4:GOTO 2490 £13633 

2750 '** Druckerparameter **************** £48033 

************************************* 

2760 CLS#3:CLS#4 £6953 


2770 me 1d*=”D RUCKERPARAMETE £2266 3 
R” 

2780 L0CATE#2,1,1 : PRINTtt2,TAB((38-LENImeld £41683 
*))/2);meld* 

2790 L0CATE#3,3,3:PRINT#3,CHR®(24);* D R U £38663 
CKERPARAHETER " ;CHR*(24) 

2800 L0CATE#3,10,5:PRINT#3,CHR*(24)i“ DRUC £43433 
KERSTATUS:“!CHR*<24>:PRINT#3 

2810 PRINTtt3,TAB(10)i"ZEILENABSTAND £25843 

/2 16 *:PRINT#3 

2820 PRINTtt3,TAB(10)i“ZEICHENSATZ £13463 

”:PSINTtt3 

2830 PRlNTtt3,TAB(10);"ZEILENZAHL":PR1NT#3 £25823 
2840 PRINT#3,TAB(10);"BRIEFQUALIT£T“:PRINT £30343 
tt3 

2850 PRINTK3, TAB( 10) 1 “PAPI ERHÄNG EL 1 ': PRI NTS £25033 
3 

2860 PRINTtt3,TAB(10);"UNTERSTREICHUNG“:PR1 £25993 
NTtt3 

2870 ORIGIN 75,275 £793 

2880 DRAWR 130,0,1:DRAWR 0,-20:DRAUR -130, £20113 


0:DRAWR 0,20 

2890 HOVER 0,-32:DRAWR 130,0:DRAWR 0,-20:D £28143 
RAWR -130,0:DRAWR 0,20 

2900 HOVER 0,-32:DRAWR 130,0:DRAWR 0,-20:D C26143 
RAWR -130,0:DRAWR 0,20 

2910 HOVER 0,-32:DRAWR 130,0:DRAWR 0,-20:D £28143 
RAWR -130,0:DRAWR 0,20 

2920 HOVER 0,-32:DRAWR 130,0:DRAWR 0,-20:D £28143 
RAWR - 130,0:DRAWR 0,20 

2930 HOVER 0,-32:DRAWR 130,0:DRAWR 0,-20:D £28143 
RAWR -130,0:DRAWR 0,20 

2940 ORIGIN 25,318 £4603 

2950 DRAWR 580,0:DRAWR 0,-240:DRAWR -580,0 £19883 
:DRAWR 0,240 

2960 CLStt4:x=8:y=7 CI 187 3 

2970 L0CATE#3,x,y:PRINTtt3,CHR*(246>; £14923 

2980 CLStt4:PRINTtt4,TAB(15);CHR®(242);CHR#( C59093 
243);" = Endern ";CHR*(240);CHR*(241); 

“ = u Chlen *J• ENTER = Ende" 

2990 IF INP(&F500)=26 THEN druck$="EIN" EL £26003 
SE druck®= “AUS" 

3000 IF I NP( 6-F500) =90 THEN PRINT#4, TAB(20) C4G363 
;CHR*(7);"Bitte Drucker ON LINE schalten ! 


3010 L0CATEtt3,30,5:PRINT#3,druck* C 14953 

3020 LOCATE#3,30,7:PRINTtt3,USING “###”;zab £21363 
3030 L0CATEtt3,30,9:PRINTÖ3,zeisa® £9603 

3040 L0CATE#3,30, 11: PRI NT#3, USING ”#tt#tt'';z £25163 
ei 1 

3050 L0CATE#3,3O.13:PRINT#3,nlq® £12563 

3060 L0CATE#3,30,15:PRINTtt3,papm® £8731 

3070 L0CATE#3,3O,17:PRINT#3,ustr# £13203 

3080 wahI*=INKEY*:IF uahl*='"' THEN 3080 £19693 

3090 IF INKEY( 18)=0 THEN GOTO 3170 C5093 

3100 IF INKEY(2>=0 AND y<17 THEN GOSUB 493 C15603 
0 

3110 IF INKEY(0 >=0 AND y>7 THEN GOSUB 4990 C11863 
3120 IF INKEY( 1 )=0 THEN GOTO 3240 C13313 

3130 IF INKEY<8)=0 THEN GOTO 3320 £21393 

3140 IF INP(8.F500) =26 THEN druck*="EIN" EL £26003 
SE druck*="AUS" 

3150 L0CATE#3,30,5:PRINT#3,druck* £14953 

3160 GOTO 3080 £6243 

3170 PRINT«8,CHR*(27);CHR»(51);CHR*(zab); £27323 

3180 IF zeisaSr “DEUTSCH 11 THEN PRINTtt 8 , CHR* £47083 


(27);CHR*(54) ELSE PRINTttB,CHR*(27);CHF*(5 
5) 

3190 IF nlq»="EIN“ THEN PRINT#8,CHR*(27);C £55893 
HR*(73!;CHR*(3) ELSE PRINT#8,CHR*(27);CHR* 

(73):CHR*(1) 

3200 IF papa*="PR~FEN" THEN PRINT# 8 ,CHR*(2 £47883 
7);CHR®<57) ELSE PRINT#B,CHR*127);CHR*(56) 

3210 IF ustr*= “EIN“ THEN PRINT«8,CHR*(27); C44603 
CHR*(45);CHR®<1) ELSE PRINTttB,CHR*(27);CHR 
*(45);CHR*(0) 

3220 GOTO 860 C5363 

3230 '** Druckerparameter aendern ******** £48483 

************************************* 

3240 IF y=7 AND zab<127 THEN zab=zab+l £27253 

3250 IF y=9 AND zeisa*=”DEUTSCH" THEN zeis £43643 
a*=“ INTERN. 11 

3260 zei1=216/zab*5 £6703 

3270 IF y=13 AND nIq*="AUS" THEN nlq*="EIN £20793 


3280 IF y=15 AND papm*="PR~FEN“ THEN papm* £28593 
= "~BERG. “ 

3290 IF y=17 AND ustr*="AUS" THEN ustr*="E £18803 
IN“ 


3300 GOTO 3010 


£455 3 


44 PC 4'87 






Programm—i 


3310 

’** Druckerparameter aendern ******** 

C 48481 

************************************* 


3320 

IF y=7 AND zab> 1 THEN zab=zab-l 

C18981 

3330 

1F y=9 AND zeisa*="INTERN." THEN zeis 

C 2006 3 

a*="DEUTSCH" 


3340 

zei1=216/zab*5 

C 6703 

3350 

IF y= 13 AND nlq*="EIN" THEN nlq*=“AUS 

£22693 

33S0 

1F y= 15 AND papm*="~BERG." THEN papm* 

t30401 

= ''PR 

’EFEN “ 


3370 

IF y=17 AND ustr*="EIN" THEN ustr*="A 

C2276] 

US" 

3380 

GOTO 3010 

C 455 3 

3390 

'** Adressverwaltung **************** 

136833 

************************************* 


3400 

DIH adräl 105,2):adrnax=0 

C22183 

34 10 

OPENIN "adressen.dat" 

C22713 

3420 

3NPUT#9,adrmax:IF adrmax=0 THEN GOTO 

C32993 

3460 

3430 

FOR i=l TO adrmax 

£11043 

3440 

1NPUTH9,adrSti,1) , adrSl i ,2) 

£22433 

3450 

NEXT i 

£375 3 

3460 

PRlNTt*4,TAB(21) ;CHR*(7) : "Es uurden ■ i 

£43533 

adrmax;" DatsnsCtze eingelesen ! 11 


3470 

CLOSEIN 

£7523 

3480 

FOR i=l TO 500:NEXT i:aend=0 

£ 1526 3 

3490 

CLS#3:CLSH4 

£695 3 

3500 

me1d#= " A DRESSVERWALTUN 

£26543 

3510 

L0CATEH2,1,1:PRINT#2,TAB((38-LEN(meld 

£41683 

*1 >/2>;meld* 


3520 

LOCATE#3,8,6:PR INT#3,"(E) ADRESSEN El 

£31123 

NGEBEN“:PRINT#3 


3530 

PRINTÖ3,TAB(8);"(L) ADRESSEN LJSCHEN" 

£26323 

'• PR I NT#3 


3540 

PRINTB3.TAB18I;“(D) ADRESSEN DRUCKEN" 

£ 19043 

:PRINT#3 


3550 

PRINT#3,TAB(B);"(A) ADRESSEN ANZEIGEN 

£33613 

* • PRINT#3 


3560 

PRINT#3,TAB(9);"IS) ADRESSEN SORTIERE 

£31583 

N" :PRINT#3 


3570 

PR INT#3,TAB(8);CHR»<24);"(Z) ZUR~CK“; 

£24373 

CHRS124) 


3580 

uahl*=INKEY«:IF wah)$='"’ THEN 3580 

£20933 

3590 

IF INKEY(711=0 THEN GOTO 3670 

£8873 

3600 

IF INKEY(58)=0 THEN GOTO 3880 

£ 13313 

3610 

IF INKEY(61)=0 THEN GOTO 4050 

£ 18163 

3620 

IF INKEYl36)=0 THEN GOTO 4150 

£ 11333 

3630 

IF INKEY(60)=0 THEN GOTO 4300 

£ 14243 

3640 

IF INKEY(691=0 THEN GOTO 4150 

£23393 

3650 

GOTO 3580 

£4933 

3660 

'** Adressendatei zur3ckschreiben *** 

£39343 

************************************ 


3670 

IF aend=0 THEN GOTO 3850 

£ 10103 

3680 

CLS#3: CLS#4 

£6953 

3690 

PRINT#4," Die Adressdatei wird auf D 

£ 7006 3 

iskette zur 3ckgeschneben. Bitte etwas Ged 


ult 

. . “ 


3700 

adraax=0 

£450 3 

37 10 

FOR i=l TO 105 

C337 3 

3720 

IF adr*(i, 1) = “" THEN GOTO 3740 

[12063 

3730 

adrmax=adrmax+1 

[8423 

3740 

NEXT i 

£3753 

3750 

OPENOUT "ADRESSEN.DAT" 

£ 16173 

3760 

HRITEW9,adrmax 

t 14023 

3770 

FOR i=1 TO 105 

[337 3 

3780 

IF adr*(i, 1) = " " THEN GOTO 3800 

[ 1274 3 

3790 

WRITE#9,adr* ti, 1);adr*li,2) 

[13923 

3800 

NEXT i 

[375 3 

3810 

CLOSEOUT 

[9023 

3820 

PRINT#4,TAB(29);CHR*17);adrmaxi"Adres 

[48753 

sen 

Sind gesichert 1":FOR i=l TO 1500:NEXT 


3830 

CLSS3:CLSS4 

£695 3 

3840 

loesch*=“*.BAK“::ESA,Sloesch* 

£28093 

3850 

ERASE adr* 

£253 3 

3860 

GOTO 850 

£330 3 

3870 

■** Adressen emgeben *************** 

[46273 

************************************* 


3880 

aend= 1 

£3513 


3890 

CLStt3: CLSt)4 

£ 695 j 

3900 

FOR i=adrmax+1 TO 100 

£11141 

3910 

CLS#4:PR INT#4," Bitte geben Sie jetzt 

£69951 

d ie 

Adresse mit maximal 60 Zeichen ein " 


3920 

INPUT04,“ Adresse: ";adr*(i,l) 

£ 14723 

3930 

IF adrSli, 1 ) = " " THEN GOTO 4020 

£ 12783 

3940 

IF LEN Iadr*( i , 1)1< =60 THEN 3960 

£ 19633 

3950 

CLS#4:PR INT#4,TAB(30! ;CHRS(7);"EINGAB 

[44323 

E ZU 

LANG I “ :FOR s=1 TO 500:NEXT S :GOTO 39 


10 

3960 

CLS#4:PRINT#4," Bitte geben Sie jetzt 

[73333 

die 

Telefonnummer mit maximal 14 Zeichen 


3970 

I NPUT44, " Telefonnummer: ";adr*(i,2> 

£2'.713 

3980 

IF LENtadrSti,2))<=14 THEN 4000 

£21443 

3990 

CLSH4:PRINT#4,TAB(30);CHR$I7);"EINGAB 

£44783 

E ZU 
60 

LANG ! ":FOR s=l TO 500:NEXT s:GOTO 39 


4000 

,2) 

4010 

PRINT#3," “ ; adr $ (i, 1);TAB(64);adr$Ci 

£ 1267 3 

NEXT i 

£3753 

4020 

CLS#3:CLS#4 

£695 3 

4030 

GOTO 3490 

£4873 

4040 

■** Adressen ausdrucken ************* 

£46993 

************************************* 


4050 

CLS#4 

£386 3 

4060 

PRINT#8,STRINGs<80,"*") 

£ 14203 

4070 

PR I NT#8,CHR* ( 14) ;TAB(7);"ADRESSENL1ST 

£53753 

E per " > LEFT* <datS,2)+"."+MID*(datS,3,2)+" 


. "+RlGHT$(dat*,2);CHR*(20) 


4080 

PRlNTtte, STRINGS(80, **") 

£ 14203 

4090 

FOR i=l TO 100 

£326 3 

4 100 

IF adrSli, 1 ) = " " THEN 4120 

£8393 

4 1 10 

PRINTÖ8, USING ";i;:PR INT#8, " ";adr 

£29403 

* 1 i, 

! ;TAB(65);adr*(i,2) 


4 120 

NEXT i 

£3753 

4 130 

GOTO 3490 

£4873 

4140 

’** Adressen ansehen/1 \schen ******** 

£36083 

************************************ 


4 150 

aend= l :z=1:x=15 

£ 12033 

4160 

CLS«3:CLS#4 

£695 3 

4 170 

PRINT#3 

£3163 

4 180 

PR INT#3,TAB(2); CHR*(24);" Adressen“i 

£52743 

TAB(64);"Telefonnummer “ ;CHR*(24):PRINT#3 


4190 

FOR i=z TO x 

£726 3 

4200 

PRINTÜ3,USING "###";i;:PRINTH3, ■ ";ad 

£41113 

r*( i 

1);TAB 164);adr * (i.2) 


4210 

NEXT i 

£375 3 

4220 

PRINT#4,TAB(12);CHR*C240);" = Weiter 

£67573 

"; CHR*1241);" = Zur3ck ";"L = l\schen 



;"ENTER = Ende" 


4230 

uah1*=INKEYS:IF uahl*="" THEN 4230 

£ 18593 

4240 

IF INKEY(0)=0 AND x<91 THEN z=z+15:x= 

£23133 

x+15 

GOTO 4160 


4250 

IF INKEYl2)=0 AND x>19 THEN z=z-15:x= 

£ 13223 

x- 15 

GOTO 4160 


4260 

IF INKEY(36)=0 THEN GOTO 6860 

£ 12453 

4270 

IF INKEY 118)=0 THEN GOTO 3490 ELSE 42 

£ 14423 

30 

4280 

. 

C 1173 

4290 

'*** Adressen sortieren ************* 

£50353 

************************************* 


4300 

sort= 1 :aend =1 

£ 15983 

4310 

CLStt4:PRINT#4,TAB(28);"Ich Sortiere . 

£20773 

4320 

WH 1 LE sort= 1 

£ 14513 

4330 

sort=0 

£8703 

4340 

FOR i=l TO adrmax-1 

£ 1373 3 

4350 

80 

IF adr* <i,1) >adr*(i+1,1) THEN GOTO 43 

£ 17223 

4360 

NEXT i 

£3753 

4370 

GOTO 4420 

£325 3 

4380 

he 1p*=adr* 1i,1):adr*li, 1 ) =adr*(l + 1, 1) 

£23933 

: adr$( i+I, 1 )=he1p* 


4 390 

he 1 p*=adr*(i,2):adr*(i, 2 )=adr*(i + 1 ,2) 

£26973 

:adr$(i+),2)=he1p* 


4400 

sort= 1 

£869 3 

44 10 

GOTO 4360 

£545 3 

4420 

WEND 

£3903 
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4430 CLS#4:PRINT#4,TAB(24);"Adressen sind C28063 
sort iert ! 11 

4440 SOUND 1,300,100,6 C12693 

4450 FOR s=l TO 1500:NEXT s C13793 

4460 GOTO 3490 C4873 

4470 ’** Systeaparaaeter ***************** C39913 
************************************ 

4400 1 CI 173 

4490 CLS#3:CLS#4 C6953 

4500 neld*="S YSTEKPARAKETER 1 ’ C21383 
4510 L0CATEN2, 1,1:PRINT#2,TAB((38-LENCBald C41683 
*> )/2)iaeld* 

4520 L0CATE#3,3,3:PRINT#3,CHR*(24)i" SYS C33753 
TEMPARAHETER H :CHR*(24> 

4530 L0CATE#3,7,5:PRINTN3,’ FLOPPY C34943 

RANDFARBE“:PRINT#3 

4540 PRINT#3,TAB<7)i“ DRUCKER C41693 

STIFTFARBE"=PRINT#3 

4550 PRINT#3,TAB< 7) ; " SPEICHER C39293 

KB HINTERGRUND":PRINT#3 

4560 PRINT#3,TAB(7);" CASSETTE C36363 

UHRZEIT Uhr“ 

4570 ORIGIN 50,308 C4463 

4580 DRAWR 95.0--DRAWR 0, -25, 1 :DRAHR -95,0: C25483 
DRAHR 0,25 

4590 HOVER 0,-32:DRAHR 95,0:DRAWR 0,-25:DR C34803 
AHR -95,0:DRAWR 0,25 

4600 «OVER 0,-32:DRAHR 9S,0:DRAWR 0,-25:DR C34803 
AVR -95,0:DRAHR 0,25 

4610 MOVER O,-32:DRAHR 95,0:DRAHR 0,-25:DR C34803 
ANR -95,0:DRAHR 0,25 

4620 ORIGIN 320,308 [2353 

4630 DRAHR 100,0;DRAWR 0,-25:DRAWR -100,0: C36183 
DRAHR 0,25 

4640 MOVER 0,-32:DRAWR 100,0:DRAHR 0,-25:D C32413 
RAHR -100,0:DRAHR 0,25 

4650 MOVER 0,-32:DRAHR 100,0:DRAHR 0,-25:D C32413 
RAHR - 100,0 = DRAHR 0,25 

4660 MOVER 0,-32:DRAHR 100,0:DRAHR 0,-25:D C32413 
RAHR -100,0:DRAHR 0,25 

4670 ORIGIN 25,318 C4603 

4680 DRAHR 580,0:DRAiR 0,-143:DRAUR -580,0 [28423 
••DRAHR 0,143 

4690 X=37:y=S [8413 

4700 L0CATEH3,x,y:PRINT#3,CHR*< 246); 114923 

4710 CLS#4:L0CATE#4,2,1 t13083 

4720 PRINTH4,TAB(7)jCHR®I242);CHR*(243)■“ [94653 

= (ndern ";CHR*(240)iCHR*(241); “ =HChI 

en COPY = Speichern ENTER = End 

e “ 

4730 IF INP(&F5001 = 154 THEN druck#="EIN" E C37043 
LSE druck*=“AUS" 

4740 L0CATEH3,20.5:PRINT#3, “READY“ C21193 

4750 L0CATEN3,21,7:PRINT#3,druck* C17013 

4760 L0CATE#3,20,9:PRINTH3,FRE(O); C14783 

4770 L0CATE#3,20,11:PRINT#3,"NICHT AKTIV IE C20673 
RT" 

4780 L0CATEH3,57,5:PRINTH3,USING “##";bord C19113 
4790 L0CATE#3,57,7:PRINT#3,USING "##";stif C23963 


4800 L0CATEH3,57,9:PRIMT#3,USING “**“;hint [10513 
4810 L0CATEN3,57,11:PRINTH3,USING "##:##“; C23893 
stunde;Minute 

4820 ' CI 173 

4830 wahl*=INKEY®:IF wahl*="" THEN 4830 C20433 

4840 IF INKEYl181=0 THEN GOTO 860 C6023 

4850 IF INKEY(2)=0 AND y<lt THEN GOSUB 494 CI 1183 
0 

4860 IF INKEYl01=0 AND y>5 THEN GOSUB 4990 [19253 
4870 IF INKEYl11=0 THEN GOSUB 5040 C18273 

4880 IF INKEYl81=0 THEN GOSUB 5150 C21943 

4890 BORDER bord:INK l,atift:INK O.hint C22303 
4900 IF INKEY(91=0 THEN GOSUB 5230 [7503 

4910 IF INKEY(11=0 AND y=ll THEN GOTO 5110 C9833 


4920 GOTO 4830 C444J 

4930 ’** Cursor positionieren ************ C41543 
************************************ 

4940 L0CATE#3.x.y:PRINT#3," C10023 

4950 y=y+2 [8163 

4360 L0CATE#3,x,y:PRINT#3,CHR®(246>; C14923 

4970 RETURN C5553 

4980 ’** Cursor positionieren ************ [41543 
************************************ 

4990 L0CATEH3,X,y:PRINTN3,* "i C10023 

5000 y=y-2 C7723 

5010 L0CATE#3,x,y:PRINT#3,CHR*(246); C14923 

5020 RETURN C5553 


5030 ’** Einstellung Indern ************** C36383 
************************************* 

5040 IF y=5 AND bord<27 THEN bord=bord+l E C22B53 
LSE 5060 

5050 L0CATEN3,57,5:PRINTH3,USING "##-;bord C19113 
5060 IF y=7 AND stift<27 THEN stlft=stift+ C41043 
1 ELSE 5080 

5070 LOCATE#3,57,7:PRINTN3,USING "##“istif C23963 
t 

5080 17 y=9 AND hint<27 THEN hlnt=hint+l E C356B3 
LSE 5100 

5090 L0CATEN3,57,9:PRINTN3,USING “##";hint C10513 
5100 RETURN C5553 

5110 CLSH4:INPÜTH4,* Bitte neue Uhrzeit ( C53453 
XXXX) eingeben: --.zeit* 

5120 IF VAL1zeit*)>2359 OR VAL(zeit*)<l TH C27313 
EN 4710 

5130 stunde=VAL<LEFT*(zeit*,2)>;minute=VAl C45903 
(RIGHT*(zeit*,2) 1--GOTO 4710 

5140 '** Einstellung aendern ************* [38263 


************************************ 

5150 IF y=5 AND bord>0 THEN bord=bord-l EL 
SE 5170 

5160 L0CATE#3,57,5: PRI NT#3, USI NG 1 bord 

5170 IF y=7 AND stlft>0 THEN stift=stift-1 
ELSE 5190 

5180 L0CATE#3,57,7:PRINTN3,USING “##-;stif 
t 

5190 IF y=9 AND hint>0 THEN h.nt=hint-l EL 
SE 5210 

5200 L0CATEN3,57, 9: PRINTH3, USI NG “»#''ihlnt 
5210 RETURN 

5220 *** Systeaparaaeter speichern ******* 
************************************ 

5230 OPENOUT “SYSPARAH.DAT“ 

5240 HRITE#9,bord,3tlft,hint 
5250 CLOSEOUT 
5260 RETURN 

5270 •** Kalender anpassen *************** 
************************************ 

5280 DIM help*(31,21) 

5290 CLS#3:CLS#4 

5300 ■eld*=“K ALENDER ANPASSE 
N“ 

5310 L0CATE#2,1, 1:PRINTH2,TAB((38-LENtaeld 
*) )/2! (melds 

5320 L0CATEA3,6,8:INPUTH3,"Helcher Monat s 
oll angepasst «erden : “map* 

5330 IF VAL(map»)<1 OR VAL(aap*)>12 THEN P 
RINT#4,CHR*(7);TAB<30)i’Falsehe Eingabe":F 
OR s=l TO 1500:NEXT s:GOTO 5290 
5340 IF VAL(map*)<10 THEN nap*=“0“+«ap* 
5350 IF ■ap*="' 1 THEN GOTO 5710 
5360 CLS#3 

5370 PRINTH4,TAB(28);“Einen Moment bitte 

5380 datei*=“TERMIN“+map*+". DAT* 

5390 OPENIN datei* 

5400 FOR i=l TO 31 
5410 FOR k=l TO 21 
5420 INPUT#9,help*(i,k> 

5430 NEXT k 
5440 NEXT i 
5450 CLOSEIN 
5460 CLS#3:CLS#4 

5470 L0CATE#3,6,12;INPUTH3,“Welcher Tag so 
11 angepa't werden■;day2* 

5480 day2=VAL(day2*) 

5490 IF day2*=■" THEN GOTO 5710 
5500 IF day2>31 OR day2< 1 THEN GOTO 5460 
5510 L0CATE#3,6,14:INPUT#3,"Geben Sie nun 
bitte Ihre Anmerkung ein : *;anm* 

5520 IF LEN(ana*)>16 THEN PRINT#4,TAB(24>; 
CHR*(7);'Anaerkung zu lang !":FOR 1=1 TO 5 
00:NEXT i:GOTO 5460 
5530 help*(day2,21)=ann* 

5540 L0CATEN3,6,16:PRINT#3,"Soll noch ein 
Tag in " ;nonat®(VAL(aap*));” angepa’t uerd 
en ? (j/n)" 

5550 uah1*=INKEY*:IF wahl*="“ THEN 5550 
5560 IF UPPER*(wahI*)="J" THEN GOTO 5460 
5570 CLS#3:CLS#4 

5580 PR INT#4,TAB<16);“Daten werden wieder 
gespeichert. Bitte warten ..." 

5590 OPENOUT datei* 

5600 FOR i=l TO 31 
5610 FOR k=l TO 21 
5620 HRITEH9,help*(1,k) 

5630 NEXT k 
5640 NEXT i 
5650 CLOSEOUT 

5660 PRINTH4,TAB(28IiCHR*(7);"Daten sind g 
esichert !“:FOR s=l TO 1500:NEXT s 
5670 CLS#4 

5680 PRINT#4,TAB(12);“Hollen Sie noch eine 
n Monat anpassen ? (j/n)" 

5690 wahl*=INKEY*:IF wahl*=““ THEN 5690 
5700 IF UPPER*(wahl*)=*J“ THEN 5320 
5710 ERASE help* 

5720 GOTO 860 

5730 ’** Passwort neu/Cndern ************* 
************************************* 

5740 CLS#3:CLS#4 

5750 aeld*="P A S S H 0 R T NEU/CNDERN“ 
5760 L0CATEN2,1,1:PRINT#2.TABI(38-LEN(aeld 
*))/2)iaeld* 

5770 UIND0HH5.10,70,7,17:PEN#5,0:PAPERS5,1 
:CLS#5 

5780 PRINT#5:PRINTN5," Achten Sie bitte da 
rauf, das niemand in Ihrer NChe steht," 
5790 PRINTH5," wenn Sie nun Ihr PASSHORT C 
ndern.“ 

5800 PRINTH5," Der Sinn eines Pa’Wortes gi 
nge sonst verloren und jeder ■ 

5810 PRINTNS,“ k\nnte Ihre Daten l\schen, 
verftlschen oder Cndern." 

5820 PRINTN5," Merken Sie sich Ihr neues P 
a'wort gut, Ihre Daten sind “ 

5830 PRINTN5,* sonst ebenfalls verloren." 
5840 PRINT#5 : FRINT#5,TAB(5);“Henn alles in 
Ordnung ist bitte Taste drlcken.“ 

5850 wähl*=INKEY*:IF wahl*=““ THEN 5850 
5860 CLS#5 

5870 PRINT#5:PRINT#5,TAB(8):“Altes PASSHOR 
T : “(passuort* 

5880 PRINT#5,TAB(8>1“Neues PASSWORT :‘;:IN 
PUT#5,pass* 

5890 IF pass*=“" THEN 860 
5900 IF LEN(pass*)<=8 THEN 5930 


C33073 

C 19113 
C36833 

£23963 

C26193 

C 10513 
C5553 
C 4621 3 

C11773 
C20823 
[9023 
£5553 
C40753 

C11833 
[6953 
E25363 


C41683 
C47953 
C77903 


C19213 
C 11393 
C3713 
C 21803 

C10883 

C8773 

C3103 

C 10993 

C 17153 

£3733 

£3753 

C7523 

C6953 

C37833 

C9583 
[5853 
C 1304 3 
t50223 

[48283 


C 10443 
C55033 


C20823 
C 17113 
C6953 
[50613 

C7383 
C3103 
C10993 
C16993 
[3733 
C3753 
[9023 
[42843 

C3863 

[43103 

C21583 
C18093 
[453 
[5363 
C47173 

[6953 
C19363 
C41683 

C32263 

C65563 

[48663 

C52993 

[72423 


[61953 

C22893 
C64353 

[21583 

[3853 

[41593 

C28883 

C 11743 
C24433 
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5910 PRINTN5,TAB<8);CHR»(7)1"UNG~LTIGES PA 
SSWORT":FOR s=l TO 1500:NEXT s 

C39343 

5920 GOTO 5860 

15011 

5930 passwort»=pa33» 

[ 14023 

5940 CLS#5:PRINT#5:PRINTS5," Nach dem Absp 
eichern erfolgt ein NEUSTART!" 

[50091 

5950 PRINTH5," Soll das neue Pa'wort gespe 
ichert werden ? (j/n)* 

£43463 

5960 wahl»=INKEY*:IF wahl*="“ THEN 5960 

C20961 

5970 IF UPPER*(wähl*)<>"J“ THEN GOTO 960 E 
LSE 5960 

£38061 

5980 PRINT»4,TABI32);"Moment bitte ..." 

£20351 

5990 OPENOUT "PASSNORT.DAT" 

C29143 

6000 WRITEH9,passwort* 

C14861 

6010 CLOSEOUT 

£9021 

6020 CLEAR 

12173 

6030 GOTO 10 

[3921 

6040 ’** Superplan beenden *************** 
************************************ 

[35491 

6050 CLS#3:CLS#4 

£6953 

6060 meld»="S UPERPLAN BEENDE 
N" 

6070 L0CATEB2,1,1:PR1NTB2,TAB<(36-LENlaeld 
*)>/2>imeid* 

£24791 

£41683 

6080 PR1NTB3:PRINT#3,* HNchten Sie das Pro 
graan SUPERPLAN wirklich beenden ?“ 

C41553 

6090 PR1NTB3," Bitte geben Sie Ihre Entsch 
eidung ein ! (j/n)“ 

£37853 

6100 wah1»=INKEY»:IF wahl*="" THEN 6100 

C 18603 

6110 IF UPPER*(wahl»)=‘J" THEN GOTO 6130 

C16003 

6120 GOTO 860 

£536 3 

6130 CLSB3 

[3713 

6140 PRINTB3:PRINTB3,CHR»(71;" Sie haben " 
:stunde-std;".Stunden und “ininuta-ainu; “ 
Minuten mit SUPERFLAN gearbeitet.“ 

[75963 

6150 PRINTB3:PRINT#3,CHR»(7 );" Es werden n 
un alle Dateien geschlossen ..." 

C66903 

6160 CLOSEOUT 

[9023 

6170 FOR i = l TO 1000.-NEXT i 

[674 3 

6180 loeach»="*.BAK":!ERA,@loesch»:CLEAR 

[28333 

6190 FOR i = l TO 1000-‘NEXT i 

[674 3 

6200 PRINT#3:PRINT#3,CHR» (7);“ AUF H 

I EDERSEHEN-* 

£28513 

6210 FOR s=l TO 1500:NEXT s 

[ 13793 

6220 BORDES 1:INK 0,1:INK 1,24 

[ 13653 

6230 'Hier kann wieder NEW emgefuegt uerd 

£ 1754 3 

6240 MODE 1:END 

£6483 

6250 ’** ErklCrungen zum Programm ******** 
************************************* 

C31033 

6260 CLSB4 

£3863 

6270 meld*="T U T 0 R I A L" 

C 13323 

6260 L0CATEB2,1,1:PRINTB2,TAB((38-LEN(meld 
»))/2);meld» 

£41683 

6290 ■ 

[1173 

6300 W1ND0WB5,13,67,6,19:FAPER»5,1:PEN#5,0 
:CLS#5 

C35763 

6310 PRINTB5 

[3143 

6320 PRINTB5," SUPERPLAN Version 2.0 ist e 

in Programm zur komfor-* 

[65283 

6330 PRINTB5,” tablen Verwaltung von Termi 
nen f3r das ganze Jahr.”; 

£57463 

6340 PRINTB5," Sie k\nnen sich mit SUPERPL 
AN Ihren individuellen"; 

£58423 

6350 PRINTB5,“ Jahres- und Honatskalender 
erstellen, indem Sie " 

£49523 

6360 PRINTB5, ” ihm Ihre pers\nlichen Daten 
Ditteilen.":PRINTB5 

[74413 

6370 PRINTB5,“ Eine Adressverualtung sowie 
eine gute Druck-Option“ 

[77183 

6360 PRINTB5," Sind ebenso enthalten, wie 
etwa Bin Pa'uortschutz" 

C39373 

6390 PRINTS5," und eine Anpassungsroutine 
flr Drucker und Bild-" 

[45663 

6400 FRINTB5," schirm auf Ihre pers\nliche 
n WInsche.” 

C38993 

6410 PRINT#5:PRINT#5," Weiter Bi 

t Tastendruck ... " 

C27293 

6420 uahl»=INKEY»:IF uahl»="" THEN 6420 

C21643 

6430 CLS#5 

C3653 

6440 PRINT#5: PRINTH5, 11 " ;CHR*( 24) ; "Die STA 
TUSZEILE (oberer Balken)";CHR»(24) 

[57153 

6450 PRINT#5:PRINT#5,“ In der STATUSZEILE 
k\nnen Sie jederzeit den Men3-" 

C59063 

6460 PRINTH5," punkt sehen, in dem Sie sic 
h befinden. " 

C37783 

6470 PRINT#5," Ebenfalls stlndig sichtbar 
ist das Datum, die Uhr-“ 

[48743 

6460 PRINTW5," zeit und der noch zur Verfl 
gung stehende Speicher." 

[49413 

6490 PRINTS5:PRINTS5," Weiter Bi 

t Tastendruck ... " 

[27293 

6500 wähl»=INKEY*:IF wahl»=““ THEN 6500 

£21643 

6510 CLS#5 

£385 3 

6520 PRINT#5:PRINT#S, " * ;CHR*(24);“Die ANZ 
E1GESEITE (mittlerer Bereich)*;CHR*124) 

£72593 

6530 PRINTW5:PR1NTW5,“ Auf der ANZEIGESEIT 
E erhalten Sie alle Ausdrucke, 11 

£56753 

6540 PRINT#5," Kalenderanzeigen, Termindat 
en, Adressdaten sowie"; 

£60913 

6550 PRINTW5," alle aSglichen Untermen 3s.“ 
:PRINT#5 

C51923 

6560 PRINTS5," Ausserdem erfolgen hier ein 
ige Abfragen." 

[39333 

6570 PRINT#5:PRINT#5," Heiter mi 

t Tastendruck ... " 

£27293 

6560 wahl*=INKEY»:IF uahl»="" THEN 6580 

£21463 

6590 CLS#5 

£3853 

6600 PRINTS5:PRINTtt5." ";CHR$(24);'Die BEF 

£60423 


EHLSZEILE (unterer Balken 1“;CHK»124) 

6610 PRINT#5:PRINT#5,“ In der BEFEHLSZEILE £67193 
«erden alle Fehleraeldungen und’ 

6620 PRINTH5," alle Eingaben behandelt und C48553 
angezeigt." 

8630 PRINTH5," Fehlermeldungen werden durc [53263 
h das Drucken einer * 

6640 PRINTH5.“ Taste oder automatisch Mied C54543 
er gel\scht. u 

6650 PRINT#5:PRINT#5," “:CHR»!24)i“Beachte C59203 
n Sie diese Anweisungen bitte genau. "iCHR 
»(24) 

6660 PRINTM5:PRINT#5, 11 Heiter mi C27293 

t Tastendruck ... * 

6670 wahl»=INKEY»:IF uahl*="“ THEN 6670 121383 

6680 CLS#2:CLS#3 C6373 

6690 RETURN C5553 

6700 '** Uhrzeitprogramm ***************** C43033 
************************************ 

6710 IF «inute=59 THEN stunde=stunde+1 C23123 

6720 IF stunde=24 THEN stunde=0 C22583 

6730 IF ninute=59 THEN ainute=0 ELSE ninut C43273 
e=m inute +1 

6740 L0CATE#2,75,1:PRINT#2,USING"##:##":st [33213 
unde;minute 


6750 RETURN C5553 

6760 '** Passwortinterpretation ********** C44363 
************************************ 

6770 use=VAL(RIGHT#(Passwort»,1)> C21793 

6780 IF use>=0 AND use< 10 THEN 6790 ELSE o C33333 
k=0:RETURN 

6790 lUSER.use C5383 

6600 OPENIN "PASSWORT.DAT“ C 173 13 

6810 INPUT#9,Passwort* C15543 

6820 CLOSEIN C7523 

6830 IF passwort#=passt» THEN ok=l=RETURN C21013 
6840 ok=0:RETURN C6083 

6850 ’** Adresse l\schen ***************** C53393 
************************************* 

6860 CLS«4:aend=l C7923 

6870 PRINTH4," Welche Adresse soll gelNsch C32693 
t werden ?“ 

6880 INPUTW4,* Adresse Nummer; ";i C 18343 

6890 CLS#4:PRINT#4,” ■ ;adr»( i, 11; * ";adr C25833 

»(i,2) 

6900 PRINT#4,TAB(24)i" Wirklich lNschen ? C29183 

(J/n)" 

6910 wah1»=INKEY»:IF Hahl»="■ THEN 6910 £21463 

6920 IF INKEY<381=0 THEN GOTO 4160 C 16343 

6930 adr»(i,1 ) = “":adr»Ci,2) = "” [18073 

6940 CLS#4 C3863 

6950 GOTO 4160 [5053 

6960 ’** Free Bytes Anzeige ************** C2913J 
************************************ 


6970 LOCATE#1,72,1:PRINT» 1,USING"#####“;FR [19343 
E<0); 


6980 RETURN C5553 

6990 •** Alarnzeit pruefen *************** [41773 

************************************ 

7000 IF stunde=alarml AND minute>= alar*2 C39203 
THEN 7010 ELSE 7120 

7010 CLS#4 C3863 

7020 PRINT#4,TABC8>;"Sie wollten um ";alar £59513 
ml;":";alara2;" Uhr benachrichtigt werden 
! “ 

7030 alarml=0:alarm2=0 £2493 

7040 FOR *=1 TO 10 C5823 

7050 FOR n=100 TO 200 STEP 10 C10693 

7060 SOUND l,n,5 [11403 

7070 NEXT n C3663 

7080 FOR n=200 TO 100 STEP -10 [17573 

7090 SOUND l.n,3 C11503 

7100 NEXT n C3663 

7110 NEXT m [3713 

7120 RETURN C5553 


7130 ***** Fehlerbehandlungsroutine ****** £40623 
************************************* 

7140 CLS#4:PRINT#4,TAB(10); "Fehler in Zeil £25693 
e ";ERL 

7150 PRINT#4,TAB<10);"Fehlercode ";ERR:FOR [18943 
s=l TO 2000:NEXT s 

7160 RESUHE 860 £6473 

7170 ’**** Break - Behandlung ************ C28203 
************************************* 


7180 CLS#4:PRINTH4,TAB( 16):CHS*(7); " Eine £68273 
Unterbrechung mit ESC ist nicht m\glich." 

7190 FRINT#4,"Drlcken Sie nun bitte die EN [84263 
TER-Taste. Jede andere Taste l\scht das Pr 
ogramm.•;CHR*(7); 

7200 CALL &.BB06 [3933 

7210 IF INKEY(18)=0 THEN GOTO 860 ELSE STO £9113 
P 

7220 •**** Tastatureinstellung *********** C28123 
************************************ 

7230 SYMBOL AFTER 91 C12133 

7240 SYMBOL 91,72,0,120,12,124,204.118,0 C20483 

7250 SYMBOL 92,36,0,60,102,102,102,60,0 C19363 

7260 SYMBOL 93,36,0,102,102,102,102,60,0 C16753 

7270 SYMBOL 123,90,60,102,102,126,102,102, £23913 

0 

7280 SYMBOL 125,186,102,198,198,198,102,56 £24923 

,0 

7290 SYHBOL 126,102,0,102,102,102,102,60,0 C23463 
7300 SYMBOL 96,120,198,198,252,198,198,248 C22903 
, 192 

7310 KEY DEF 17,1,93,126,0 CI 1533 

7320 KEY DEF 19,1,91,123,0 C10343 

7330 KEY DEF 22,1,92,125,0 [12643 

7340 KEY DEF 24,1,96,94,163 [12023 

7350 RETURN C5553 
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I Kurse 



Weiter geht es mit dem zweiten Teil 
unseres DE-LUXE Diskmonitors für 
die Rechner der CPC-Reihe. 

Die schlechte Nachricht gleich vorne¬ 
weg: Bisher hat sich noch kein Leser 
gemeldet, der uns eine Referenz zur 
Vortex Floppy schicken konnte. Wir 
geben jedoch nicht auf und hoffen, daß 
wir einen Nachtrag bringen können. 
Außerdem hat sich im ersten Teil des 
Listings ein unbedeutender wenn auch 
unschöner Fehler eingeschlichen. Än¬ 
dern Sie bitte die Zeile 1760 wie folgt: 
176Q track=int (a/secanz) 

Ansonsten waren keine Fehler festzu- 
stellen. Wie Assemblerinteressierte 
feststellen werden, arbeitet das Assem¬ 
blerprogramm mit den Befehlssuch¬ 
routinen des AMS-DOS. 

Im abgedruckten Assemblerlisting 
(DEVPAC) finden Sie in Zeile 570 
den Befehlscode für den Direktbefehl 
Sektor lesen &84. 


Es ist anzunehmen, daß bei Vortex die 
gleichen Befehlssequenzen benutzt 
werden, so daß eigentlich nur die Wer¬ 
te Für die Trackanzahl geändert wer¬ 
den müssen. Es bleibt jedoch zu 
erwarten, daß nach Abdruck des 
Quellcodes mehr Vortex Besitzer Mo¬ 
tivation bekommen, uns eine Anpas¬ 
sungsroutine zuzuschicken, anstatt 
sich laufend zu beschweren, daß zu 
wenig für sie getan wird. 

Zeile 1300 im Assemblerlisting ist ei¬ 
gentlich überflüssig und kann beden¬ 
kenlos gestrichen werden. 

Eine genaue Anleitung wie Sie mit 
dem Monitor umzugehen haben finden 
Sie weiter unten im Bericht, und in der 
nächsten und letzten Lektion werden 
wir uns dann daran machen, die Dis¬ 
kette zu erforschen und die Bedeutung 
von Bits und Bytes zu entschlüsseln. 


Beschreibung der 
RSX-Befehle: 


Es folgt nun eine Beschreibung aller 
RSX-Befehle, die im Programm ver¬ 
wendet werden. Die Befehle können 
später in eigene Programme imple¬ 
mentiert werden. Dazu müssen Sie nur 
den M-Code, der die RSX-Befehle er¬ 
zeugt mit 

MEMORY & 6FFF 

LOAD “MONMC.BIN“,&7000 

CALL &7000 

laden. Danach stehen Ihnen die nach¬ 
folgend beschriebenen Befehle zur 
Verfügung. Wie immer müssen auch 
hier die Befehle mit dem senkrechten 
Balken beginnen. Die Befehle benö¬ 
tigen oft verschiedene Parameter, die 
Sie der Beschreibung entnehmen kön¬ 
nen. Jetzt aber zu den Befehlen selbst: 

1. I SECREAD,track,sector,buffer 
Der Befehl SECREAD bewirkt, das 
ein beliebiger Sektor von der Disket¬ 
te gelesen wird. SECREAD braucht 


10 | 

20 | * * 
30 t * Discmon - Utilities fuer den Discmon * 


50 - * 
60 ; * 
70 ; * 
BO : • 


196ö by 


holger Juriai 
laHeetwiete 1 4 
2032 Torne?ch 


Startadresse bestiege 


130 

J 50 , 

170 ; 
Iflu i 


ORB *7000 
ENT * 

Pr ogr ar 1 

RS* »inbinen 


210 LD BC,RSX 

220 LD HL1* ERNAL 

230 Jp KBCDl 

250 j 4 Bytes fuer lernal 
260 s 

270 KERNALl DEF5 4 

200 3 


290 - RSX - Beten]stadelie 

300 ; 

310 RS*: DEFW TABLE 

32U Jp SECK 

330 JP EJECW 

340 JP HEXD 

350 JR SEARCH 

360 JP RUFF DD 

370 Jp FLFAR 


I der RS • be* *•»'l s t obe 1 I e 

I 4 Byte« luor Iar n«) 

c Routine * L LÜG £iI 


I dar he« eh 1 vwor t e 

l SECREAD - Ptiu». ine au »rufen 
j SÄCWRl Tt - Routine «u'ruter, 
1 MUrOUHP - Routine «utrulen 
t QUC.M - ROU11NE 
I BUPE1HJWN - Routine 
i PlLfFAB - Routine 


390 ; Befehlswort* 

400 j 

410 TABLE: D€FM “SECREA" 

420 DEriJ 

430 DEEM “SCCUR1I* 

440 D erb “E“•i2ß 

450 DE.Ffl MEXDU** 

460 UEFB "P-tlZfl 

470 DtFM “5EARP" 

400 

490 DfiFM "M’l’DON" 

500 DEF b "N"*«0O 

510 DEFM -F1LEPA- 

520 OEFb 

530 DEPb u 

540 i 

550 ; Routine SECREAD 

560 j 

570 SECRs LD B,eä4 

5G0 Jp Rw 

590 ; 

600 ; Routine SECWR1TE 

610 i 

620 SECW: LD B,*85 

630 ; 

64Ö ; Read / Wntp Routine 

650 ; 

660 RW: CP 3. 


I Ende der FabelJ e 


I I omandoruminer *S4 fuer Sector lesen 
j Read / Write Routine Aufrufen 


1 »omandon u eee» *uer Sect er schreib»« 


6?ö REt NZ 

ABO LD H,<I11 

690 LD L , < 1XI 

700 PUSH HL 

710 LD E,(IX*2) 

720 LD D,(1X«4> 

730 PUSH DE 

?4<: s 

750 ; t omandonunmer fpstleQen 


t Putferadresse laden 

t Bufferadresse auf Stacl 
t Sectonummer laden 
l TracPnunuiior laden 
; DE au- 1 Stack 


76<j 




770 

LD 

A.E* 


700 

LD 

< LÜMAND > ,A 


000 


BUChen 

eio 




620 

LD 

Hl ,LUMAND 

i Adresse nach HL 




I IL - FIND - COMPIANP Aufrufen 

H4l.) 





LD 

CROUADR),HL 



LD 

A, C 

1 Rcmnummnr nach A 

0 70 


(ROUADR+2),A 


800 




090 

Di sc - Routine aufrufen 


910 

POP 

OP 


920 

LD 

C.b 



LD 

A,<DRIVE) 


940 

LD 

E.A 



FOF 

HL 



HST 

600 IQ 

1 Routine aufrufen 



RDUADR 

1 Adresse .7. Byte 6loci der Routine 

990 

lOOtj 

RET 


1 Programm beenden 

Plate ♦upr 



i »ij 0 




1020 DRJ VE r DEFB 

O 







3 

» 2 Bytes fuer Adresse 

1060 

ENDE 



1070 




1OSO END: POP 

HL 






lioi» 

RET 



II» 0 

1120 

HEXDUMP 

- Routine 


1140 HEXDl CP 

i 

X 1 Parameter "* 

1 150 





CALL 

MDPF7. 



LD 

H, < IX*1 1 

1 Buff erAdresse nach HL 


LD 


1190 

LD 

fi.o 

: Zeilensehl in b 


b 







CP 

l 7 



RET 

Z 

X Wenn q l ei er*, dann End* 

1250 

Ausgabe 

einer Zei1e m 

t 16 Bytes 

1270 

Zuerst die 



1200 

1290 

1300 

LD 

LD 

A,H 

0,9t - k«~. jJMP 

i ,.«/ ; Ml m Ac» u 

D««.oren; .-u« m« , ; 



1 

; Mit Ol •erinuepfon 



A, 46 

1330 


ZEIAUS 

1 ASCII - Zeichen ausgeben 

1340 

LD 

A.L 

, Lo Byte in Acku 




Ausgabe einer Ziffer 

136i* 

LD 


Ein Zeichenvor srhub 

1770 

CALL 

ZEIAUS 

1 Ze»chenausgaoe 

1 3 BO 

Nun die He 

Ziffern 




c,r. 

j Zeichenzaehler lDtfSihUfl 

1420 HL2: LD 

A, (HL > 

: Byte ausgeben 

1430 

CALL 

ZIFHUS 




A, 9 

; Zeichenvorschub 

1 450 

C AI L 

7EIAUS 

x Zeichenvorschub 

1 460 

[NC 

HL 

: Adresse = Adresse ♦ 1 

1470 

INC 

C 

; Zei chen: aeh l er i r.crement i eren 

1480 

LD 

A.C 

1 Zei ehe«:: aen L er nach A 

’ 49 " 

CP 

16 

1 Schon 16 Zeichen • 
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Kursen 


1500 


JR 

N7,HL2 


1310 

1 




1520 

: Ascn 

- Ausgabe 


1330 





1340 


BCF 



1930 


CCF 



1560 





1570 


LD 

DE. 16 


1580 


SBC 

hl.DE 


1390 


LD 

C.O 


1 6**0 

HL 3s 

LD 

A,<MLl 

t ?•!rhpn nach A 

1610 


CP 

127 

S Zeichen 127 ^ 

1620 


JP 

F,INVAÜS 


1620 


CALL 

AUS 

i Ausgabe des Zeichens 

1640 

•ft As 

iw 



1630 


i roc 

C 


1660 


LD 

A,C 


1670 


CP 

16 


»680 


JR 

NZ,»4_T 


1640 

I Zellenende 



1700 

I 




1710 




1720 

I 




1730 


JR 

HL I 


174«» 

t 




1750 

! Ausgabe des A-cll - Zeichen* 


176«» 





1770 

Atfr: 

CP 

32 


1780 


JP 

M, HL 4 

I JA 

1790 


JR 

ZEIAUS 


1000 

I 




1010 

HL 4 s 

LD 

A, ” • " 

i Punkt Ansgeben 

1020 


JR 

ZE1 AUS 


1030 

| 




104' 

* ZIFAUS 



1030 





106«) 

ZJFALfS: 

LD 

D.A 

; Zeichen Zwischenspeichern 



RPA 



189" 


RRA 



1090 


RRA 



1900 


RRA 



1910 


CALL 

HL ft 


1920 


CD 

A.D 


1930 

HL 61 

AND 

13 


1 940 


ADD 

A.4& 

1 ZIFFERN 0-9 

I95M 


CP 

50 


1960 


JP 

M.ZE1AUS 


1970 


ADD 

0.7 


1900 

1 




1990 

I ZElAUb Rout.e 


200*1 

1 




2010 

ZEIAUbi 

PUSH 

AA 


2020 


PUSH 

BC 


2030 


PUSH 

DE 


2040 


PUSH 

Hl 


2050 


CALL 

• LbJO 

l Print Vektor 

2060 


FOF 

HL 

i Alle Register niedernoten 



EOF 

DE 


2000 


PQF 

BC 


2090 


FOF 

AF 


2100 


RET 


l Ende der Routine 

2110 





2120 

j INVAUS 



21 JO 





21*0 

INVAU5S 

LD 

E.A 


2130 


LD 

A.24 

S Inverse Modus einschalten 

216*» 


CALL 

ZEIAUS 


ZI 70 


LD 

A.E 

; Zeichen wieder holen 

2*80 


AND 

127 

; Auf 7 Blt bringen 

2190 


CALL 

AUS 

i Ausgabe des Zeichens 



LD 



2210 


CALL 

ZEIAUS 


2220 


JR 

NEA 


2220 





2240 

» l op‘; 

eile auSQAC-r. 


2250 

; 




2260 

» OPFZs 

PUSH 

AF 

i Alle Register auf Stack 

2270 


Fi/S- 

BC 


Z28m 


PUSH 

DC 


2290 


PUSH 



2300 


LD 

A. U.AENQt 1 


2310 


LD 

B.ß 


2320 


LD 

«4 .* 0PF5 

i Anfang nach, HL 

2330 

• RFLs 

LD 

A. HL i 

1 Zeichen nach A 

2340 


CALL 

ZE 1 AUS 

l ZEICHEN AUSGEBEN 

2330 


DEC 

b 

; DCCREMENTIERE B 

2360 


LD 

A, B 

i B NACH A 

2570 


CF 

Ö 

1 IST A=0 n 

CJ80 


JP 

Z.KFFE 

: SPKINÜL WLNN JA 

2390 


IMC 

HL 

; HL INkREMfcNT ThRf-N 

2400 


JP 

•PTL 


2410 

I 




2420 

’ FFE! 

FOP 

«4- 

l ALLE REGISTER ZURUECh 

2430 


POP 

DE 


2440 


PDP 

BC 


2450 


PDF 

AF 


2460 


RET 



2470 

| • 




2400 

-AENliE 

DE FE 

3» 


2490 





2500 

•CPFSi 

DE Fr 

•ho.. 0 12 3« 

5 6 7“ 

2310 


ÜEFH 

- H K o e c c 


2520 


DEFfc 

13, 10 


7330 





2340 





7550 

1 




2360 

l 




2570 

| DSEOFCH.StaRT.l AfMGC ..srfilNG« , 

iKESULT 

2380 





2390 

5EARL.H: 

CP 

4 


2600 


RE» 

NZ 


2610 





•2620 


LD 

H,11X-7I 

: StarLadr e sse holen 

26 30 


LD 

L, * 2**6» 


2640 


LD 

• BtrADRl .HL 


2650 

1 




2660 


LD 

M. UH«91 

l Laenge holen 

2670 


LÜ 



2680 


LD 

(BllFLENi .Hl 


2690 

1 




2700 


LD 

H.(!»•!) 


2710 


LÜ 

L,(I«*2) 


2720 

| 




77.30 


LD 

A,<HL1 

; Stringlaenge hclen 

2740 


lD 

<STRLCN>,A 


2730 

• 




2760 


INC 

HL 


7770 


LD 

C. 'HL » 


27BO 


INC 

HL 


2790 


LD 

b.«HL» 


2800 


LD 

»STRADR»,BC 


2810 





2070 


CALL 

SUCH 

\ Suchroutine aufrufen 

2830 





2840 


LD 

F*. « U - 1 > 


2830 


1 D 

r . «i < > 


2060 





-Q7u 


CP 



2080 


4P 

l .REI3RII» 


2890 





2900 


LD 

A,0 


2910 


LO 

«BD ,A 


sw 


INC 

BC 


2930 


LO 

(BC),A 


2940 


REt 



2930 





2 -Sfcg 

»tBKl* I 

LD 

A ,1 


2970 


LO 



298«» 


LD 

i, % h 


7990 


INC 

BC 



1000 
solo 
3020 
3030 
iu4ü 
3030 
2060 
3070 
3060 
3090 
3100 
31 lü 

3120 

3130 

3140 

3150 

3160 

3170 

316o 

3190 

3200 

3210 

3220 

3230 

3240 

3250 

3260 

3270 
2280 
3290 
3200 
T3lu 
3320 
2330 
3340 
3350 
3360 
3370 
3300 
339m 
3400 
3410 
3420 
3430 
3441> 
3450 
3460 
3.470 
3400 
3490 

33i*> 

3510 

3520 

353*» 

3540 

3550 

3560 

3570 

3560 
23*6.1 
26 OM 
2610 
362g 
2630 
2640 
3650 

3660 

3670 

3ö8m 

3690 

3700 

3710 

3720 

3730 

3740 

3750 

3760 

3770 

3780 

2790 

3Bmm 

2810 

282.» 

3820 

3B4u 

38SO 

3860 

3870 

”980 

3890 

3900 

39 lg 
3920 


•BCi,A 

•••• Haupt Suchrauti 


BUFADR: DEFS 2 
BUFLENi DEFS 2 
STRADR*. DCF5 2 
STRIEN: DEFS l 


SUCH: LD 


SCF 

CCF 

bBC 

INC 


HL,<BUFLENJ 

A, «STRLENI 

C.A 

B. O 


M-,BC 
ML 
B.M 
C ,L 

*9_, (STRADR) 
A, <HL> 

»9., C BHF ADR) 

Z.FOUND 

FO.SRET 

COMP 


FUSh 

PUSH 

PUSH 


A. «STKlENI 
C.A 

B. O 


COMF1: LD A.«DE) 


POP 

PDF 

EOF 


FOP 

POP 

FOF 

RET 


Buff down - Rcaitl 


Q BUF e IXJMN , 5t Ar t adr » oe‘4 


FUQH HL 
LD Pn t 3l2 
9CF 
CCF 
SBC 


POE 

LDIR 

RET 


HL, BL 

D,M 

£,L 


930 


1 F I l«D*r amr-ter Routine 

1 

1 OFlL EPAR, %F JLENAME• 

l Ruocigabeparameter : 

« 

FLTVFi DEP5 I 
FLSTAi DEF S 2 
FLLENi DEFS 2 
FLEINi DEFS 2 

i Am Enrio de« Program«» hef »fidet 
* Buffer ♦ upr dl» Blocl*. 


3940 
295',» ; 

3960 FLPARi LF 


Startadresse Buffer 
Laenge des BuHers 
Startadresse String 
Laenqe des Strings 

Laenge nach HL 

Wahre Laenge ausrechnen 


Wahre Laege nach BC 

Stringadresse nach HL 
1. Element in Achu 
AriFangsadresse Buffer nach hL 
Suchen 

Hei Gleichheit 

Wenn BlocL durchsucht, dann SRET 
Weiter Suchen 

Register auf Stack 


Stringlaenqp nach BC 


2. Element »-erg] eichen 
«all* String nur | Elernen» 
Startadrosca 2. Elerne'! 

Zeichen aus String in A 

.prqlairnan 

Zeiger prhoehon 

wenn * Speicher, dann Zuruecl 

Wenn BC • • 

Adresse holen 

Roqistpr holen 

T.E1 - tomsw ve^nicHter, 

Wert gefunden 
Zum HmiptpraqtaM 

Register holen 


Wert nicht gefunden 


Wenn nicht, dann ruruecl 
Adresse nach HL 


Laenge nach BC 
Carry geloe^cht 

Adresse 512 Bytes tiefer berechnen 
Und ach DE spei ehern 


Orginaladresse nach HL 
Block uebertragen 


Ftletyp 

Startadresco doc Files 
Laenge des Filet 
Elnsprungsodre^ne dos Ft loa 

:h der 


j . Parameter 


3970 

39BO 

2990 
40uu 
4010 
4020 
4020 
4040 
4050 
4040 
4n 70 
4080 
4090 
41W 

4110 

4120 

4130 

4140 

4150 

4160 
4170 
41 Bo 
4190 t 
4200 

*210 LOOP21 
4220 

4230 LOOP2t 

4240 

4250 

4260 

4270 

42811 

4290 

4300 

«310 

4320 

4530 

4340 

4250 

4260 

4370 

4 28i» 

4 39m 
4400 
4410 
442m 
4420 
4440 
«450 | 

*46M FLFND« 
447M 
448«' t 
4490 Fl_fiL ► | 


RET NZ 
LD D,l|Ji*|l 
LD E, l m 
LD A,<DE> 

LD B.A 
INC DE 
LD A, i DE I 
LD L.A 
INC 0€ 

LO A.iDEi 

LD H.A 
LD DE, I «».•511 
COLI. »BC77 
LD IPLTVKl.« 
LD IFLSTAl.DE 
LD CFLLENi.Dr 
LO BC..1A 

ADD HL.PC 
LD C.IHLI 
INC ML 
LD ».IMLI 

lc ifiriNi.ee 

LD DE.FL6LI 
LD ML.«»7|« 

LD fi.la 
LO A.iHLl 
LD IDCI.A 
OK A 

JF 1 .FLENO 
iNc ne 
INC ML 
DJNr LOüFL 
LD ML, ,»I1?;H) 
LD BC . »011 
ADD ML . BC 
LU (»A7C0» .M. 

LD ML,0 
LD <»A7ö8l,Hl 
LP HL,I.A7S:< 
LC K.:o,7 

ADD ", .PC 
LD nrtTT.l.« 
LD •»A796I.BC 
push ds 
CALL ttfcL'Bn 
pop de 
•IR LOOPl 

CALL »BC»D 
R^T 

DEFS 180 


1 Wenn Ja, dann zuruecl 
t Adresse Descriptor nach DE 

I Laenge nach B 

: DE zeigt auf Strinqadresse 
x X. Low - Byte laden 


i 2. Hi Byte laden 

; 2» OFEN IN BUFFER nach DE 
i DlSC IN OPEN aufrufen 
; Fiiotvp abspeicr.ern 
; Start adr esse ahspetc en 
; rilelaenqe abspeicern 

: Byte «IA |« Header enlbaolt Einnprung 
: Dar uaddi »re«i 

t i. Low - Byte Einsprung laden 

j 2. Hi - Byte iaden 
t Einsprung abspeichern 

I »litter- luar Bloecie nach DE 
l Adresse dor Blocl tabelle 
i Ansah] Bloette / Betend 
I Bloc» nach A 
t In Bl oc» buff er -speichern 
l FIag% setron 

I Ist A - dann End» der Routine 
l Zoiger au» Eni ff er ornoehen 
l Zeiger au« naechsten Blocl 
I Naechster Bloc* 
j AMS0O5 vortaeuttrhen, 

; dass alle Koro.ds ru« 

: E te.td gelesen wurden, 
t <BA7r«i»ae. 

: AMSOOS einen leeren 
: Opernn-Bu»f*r »oetaeucchen 
{ Fointer aut letztes 
1 Zeichen i m Puffer 
t setren. 

l i»A7531-2 m 47 
1 Deltionp Zeichen 

I DI9C IN CHOR «ufrufen 
I Mit nacchstem Eiteml weiter 
l DJ SC IN ABADDN 
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r~ Kurse 


für diesen Zweck jedoch drei Parame¬ 
ter, die als Variablen oder Zahlen hin¬ 
ter den Befehl in der oben angegebe¬ 
nen Syntax angehängt werden müssen. 
Der Parameter track gibt die Nummer 
der Spur an, auf der sich der einzule¬ 
sende Sektor befindet. Der Wert sec- 
tor gibt den Sektor an, der von der 
Diskette gelesen werden soll. Dabei ist 
zu beachten, daß die tatsächlich auf 
der Diskette vorhandene Sektornum¬ 
mer angegeben wird. Als letztes muß 
noch der Wert buffer angegeben wer¬ 
den. Dieser stellt die Anfangsadresse 
eines 512 Bytes langen Speicherberei¬ 
ches dar, an den der Inhalt des Sek¬ 
tors gespeichert werden soll. 

2. I SECWRITE,track,sector,buffer 
Dies ist die Umkehrung zu SECRE- 
AD. Hier wird ein 512 Bytes langer 
Speicherbereich, dessen Anfang die 
Adresse buffer darstellt, als Sektor auf 
Diskette geschrieben. Auch hier gibt 
track die Spur- und sektor die Sektor¬ 
nummer an. 

3. I HEXDUMP,buffer 

Diese Routine schreibt 256 Bytes als 
Hex wert und als ASCII-Zeichen in 
Window #0. Da die Routine auf den 
DISCMON zugeschnitten ist, muß das 
Fenster auch die Breite haben, die das 
Fenster des Discmon hat (68 Zeichen), 
da die Ausgabe sonst falsch formatiert 
wird. Als Parameter wird die Start¬ 
adresse des 256 Bytes großen Spei¬ 
cherbereiches verlangt, der 
ausgegeben werden soll. Die Routine 
numeriert die Speicherzellen in einem 
512 Byte Rhythmus durch, d.h. daß 
sie nur Adressen vor den Werten im 
Bereich von 000 — 1FF Hex ausgibt. 
Es können jedoch alle Adressen von 
0 — FFFF Hex für buffer angegeben 
werden. 

4. I SEARCH,Start,len,@str$,@res 
Diese Routine untersucht, ob in dem 
Speicherbereich mit der Startadresse 
Start, und der Länge len der String str$ 
enthalten ist. Ist er es, so wird in die 
Variable res die Adresse geschrieben, 


in der der String gefunden wurde, an¬ 
derenfalls ist res = 0. 

Achtung: für str$ und res müssen die 
Adressen der Variablen übergeben 
werden, und nicht die Werte, da str$ 
ein String ist, und res noch verändert 
werden soll. 

5. I BUFFDOWN,adresse 

Diese Routine verschiebt den Spei¬ 
cherbereich mit der Startadresse adres- 
se und einer Länge von 512 Bytes um 
512 Bytes nach unten. Z. B. wird der 
Speicherbereich mit der Startadresse 
adresse = &.1000 und der Länge 512 
Bytes um 512 Bytes nach unten ver¬ 
schoben, d. h. er hat danach die Start¬ 
adresse &E00. 

6. I FILEPAR, @filename$ 

Diese Routine benötigt den Namen des 
Files, dessen Parameter sie suchen 
soll. Darum braucht sie die Adresse 
eines Strings als Parameter, da der 
String selbst ja nicht übergeben wer¬ 
den kann. Die Routine liefert verschie¬ 
dene Informationen über die Datei 
filename$, die in ganz bestimmten 
Speicheradressen abgelegt werden, wo 
sie sich der Benutzer per PEEK Be¬ 
fehl herausholen kann. Folgende In¬ 
formationen liefert die Routine: 

— Das Filetypbyte 

— Die Startadresse des Files 

— Die Länge des Files 

— Die Einsprungsadresse für 
Maschinenprogramme 

— Die Blocknummern, der Blöcke, 
die das Programm belegt. 

Die Werte stehen nach dem Aufruf an 
folgenden Adressen: 

— das Filetypbyte bei &7220 

— Die Startadresse bei &7221/&7222 

— Die Filelänge bei &7223/&7224 

— Die Einsprungsadresse bei &7225/ 
&7226 

— Die Blocknummern stehen ab 
&7290. 

Sie stehen hintereinander im Speicher. 
Ein Byte mit dem Wert 0 markiert das 
Ende der Tabelle. 


1 DAT* Ol.OD.70.21.09.70.C3.DI.BC.OO.OO.OO 
.00,21,70.C3.04BC 

2 DATA 4D.70.C3,S2.70,C3,8B,70,C3.77, 71, C3 
.09.72,C3,27,07D3 

3 DATA 72,53.45,43,52,45,41,CA,S3.A5,43,57 
,52.49,54,C5,05CF 

4 DATA 48.45.SS,A4,SS,4D,00,53,45.*1,52,43 
.C6,42,55.40,05AE 

5 DATA 46.44.AF.57.CE,46,49.4C.45,50.41,D2 
.00,06,64,03,05CE 

6 DATA SA.70.06.85.FE.03,CO,DD.66,01.DD,6E 
.00.E5.DD.5E.07BF 

7 DATA 02.DD.56,04.D5,70,32.fl*.70.21,84.70 
,CD,DA,BC■30.074E 

B DATA 17,22.85.70,79.32.67.70.Dl.AB.3A.83 
,70.SF,El,DF.0736 

9 DATA 85.70,C9.00,00.00.00.00,El.El.C9.FE 
.01.CO,CD.1C.06F1 

SO DATA 7S.DD.66,01.DD.6E,00.06.00,04.78.F 

E. 11.C6.7C.16.0SEB 

11 DATA 60,E6,01.C6,30,CD,FD, 70,7D,CD,£9.7 
0.3E,09,CD,FD,092B 

12 DATA 70, OE. 00.7E,CD,E9,70, 3E.09,CD,FD,7 
0,23,OC,79.FE,0749 

13 DATA 10.20.F0.37,3F.11,10,OO.ED.52.OE.O 
0.7E.FE.7F.F2.05F1 

14 DATA 09,71.CD.DE.70.23.OC.79.FE.10.20.F 
0.18.BB.FE.20.074C 

15 DATA FA.E5.70.18,1B.3E.2E,18.14.57,1F,1 

F, 1F.IF.CD.F2.0SA9 

16 DATA 70.7A.E6.0F.C6.30.FE,3A.FA.FD.70.C 
6,07, F5, Cf., 05,09D0 

17 DAT* E5.CD.5A.BB.E1.D1.C1.FI.CB.SF.JE.1 
6,CD.FD.70,7B.OASE 

18 DATA E6.7F.CD.DE.70,3E.18.CD,FD.70,lö.B 
9,F5.CS.DS,E5,0AS5 

19 DATA 3A.39,71.47,21,3C.71,?E.CD,FD.70,0 
5,78.FE.00,CA,06F6 

20 DAT» 38.71,23,C3.27,71.El.Dl.Cl.Fl.Ce.3 
8.A8,65,78,20,07D2 

21 DATA 20,30.20,20.31.20.20.32.20.20.33.2 
0.20.34,20,20.025A 

22 DATA 35.20.20,36.20.20.37.20.20.3B.20.2 
0.39.20.20.41,0294 

23 DATA 20.20.42,20.20.43,20,20.44.20.20.4 
5.20.20.46.20.02B4 

24 DATA 41,53.43.49,49,OD.QA,FE.04,CO,DD.6 
6.07.DD.6E.06.05DD 

25 DATA 22.SB,7I.DD,66.05.DD.6E,04.22.BA.7 
1.DD.66,03,DD,0762 

26 DATA 8E,02,7F.32.BE.71.23,46.23.46.ED,4 
3,BC.71.CD,BF,0712 

27 DATA 71.DD.46.Ol,DD, aE.00,FE.01.CA.B2.7 
1,3E.00.02.03.05EF 

26 DATA 02.C9.70.02.7C.03.02.CO,00.00.00.0 
0.00.00.00.2A.02BE 

29 DATA BA.71.3A.BE.71.AF. 06.00. 37.3F. EC*. * 
2.23,44.4D.2A.056C 

30 DATA BC.71.7E.2A.B8,'1.ED.B1.CC.E0.71.E 
2.06.72.ie.F6.0921 

3! DATA F5.C5.ES.3A.BE.71,4F,06.00,OD.28.0 

E. ED.56,BC.71.0715 

32 DATA 13.1A.ED.Al,13.20,OB.EA.Fl.71,El,2 

B. CI,Fl.Dl,3E.0612 

33 DATA 01.C9.EI.C1.F1.C9.3E.OO.C9.FE.01.C 
0,DD,66,01,DD,09QD 

34 DATA 6E,OO,£5.01,00.02,37,3F,ED,42,54,S 
D.E1.ED.B0.C9.06F3 

35 DATA 00.00,00.00.00.00.00.FE.01,CO.DD,5 

6, Dl,DD,5E.00.042E 

36 DATA 1A.47.13.1A.SF.13.IA.67.E0.5B.S1.A 

7. CD.77,BC.32.0603 

37 DATA 20.72.ED,53.21.72.ED.A3.23.72.01.1 
A.00.09,AE.23,04BF 

38 DATA *6.ED.*3.26,72.11.90.72.21.19.A7.0 
6.10.7E.12.B7.055E 

39 DATA CA.8C.72.13,23.10.F6.2A.29.*7,01,8 
0,00.09.22.29,0403 

40 DAT* A7,21.00,00,22.68,A7,?A.63.A7,01,F 

F. 07.09.22,53,04*2 

4! DATA A7.ED,43.98.A7.D5.CD.90.BC.01.18.C 

C, CD.7D.BC,C9,0A76 

42 DATA 00,00,00,00,00,00,00.00.00,00,00.0 
0.00,00,00,00,0000 

43 DATA 00.00,00,00.00.00.00,00.00,00.00,0 
0.00,00,00,00,0000 

44 DATA 00.00,00,00,00,00,00.00,00.00,00.0 
0.00.00.00.00,0000 

45 DATA 00.00,00,00.00,00,00.00.00,00.00.0 
0,00,00,00.00,0000 

46 DATA 00.00,00,00.00,00,00.00.00,00,00.0 
0.00,00,00.00,0000 

47 DATA 00.00.00.00.00.00,00,00.00.00,00.0 
0.00,00,00.00.0000 

48 DATA 00,00,00,00,00,00,00,00,00.00,00.0 

O,00.00,00.00.0000 

49 DATA 00,00,00.00,00.00.00,00,00.00.00.0 
0.00.00,00.00.0000 

50 DATA 00,00,00,00,00.00.00.00,00.00.00.0 
0,00,00,00,00,0000 

51 DATA 00,00.00,00.00.00.00,00,00.00.00,0 
0,00.00,00.00,0000 

52 DATA 00,00,00,00,00,00.00.00,00,00,00,0 
0,00.00.00,00,0000 

53 DATA 00.00,00.00,00,00.00,00.00.00.00,0 
0,00,00,00,00,0000 

54 sa 11!*dr *28872 

55 FOR !oop!»*l TO 53 

56 Bumnc-OiFOR loop2»"l TO 16 

57 READ bytat! byt« S VAL ("!."• by t a t >: PQKE mär 
. by t• 

SB BumQ«=«unme*byt«iadr s adr*liNEXT loop2* 
SB READ pruafBum*rpruafau««VALt"5“*pruefau 

Bf > 

60 1F pruafauiOfluaai THEN PRIMT-Fahlar in 
2a!!• !":*•!1a t END 

61 aa1Ie*za11e*1iNEXT loopia 

62 SAVE-monmc.bin".b,20672 ,836 


127971 

137SB) 
122961 
122661 
125311 
(21081 
127701 

(27331 
(25591 
(2*261 
(13631 
(30601 
(30361 
(19661 
(2385 1 
13*251 
(23041 
12*071 
1290*I 
(25831 
(17761 
(26401 
[2264] 
(30601 
C27041 
(22721 
(29611 
(21511 

130851 

130291 

129*41 

132271 

(27571 

119751 

(26181 

(30361 

(22*71 

(33*31 

(26411 

(3162 J 

(20101 

(1*271 

I1*27] 

I1*271 

11427! 

(14271 

(14271 

(1*271 

(1*271 

(1*271 

11*271 

(1*271 

(1*271 

t1B7S1 
17*1 1 
[1098! 
12044! 

[34871 

(237*3 

[37381 

111601 

(24361 
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Kurse—| 


Fortsetzung aus 3/87 


6410 REM Umbenennen 
6420 REM 

6430 f 1 Ieflag^O:GOSUB 5900 
6440 IF fileanz -0 THEN RETURN 
6450 UINDOW SWAP 2 :CLS 
6460 PRINT "Bitte geben Sie de 


C 959 ] 
C 272 J 
C 12163 
[1327 J 
11757 3 
[54073 


6050 PRINT 

6060 IF MleMag-0 THEN 6120 

6070 PRINT "Mit ENTER ";ln*; 

6060 PRINT "markieren/" 

6090 PRINT "Markierung" 

6100 PRINT "loeschen." 

6110 PRINT 

6120 PRINT "Hit " ; i n*;" G ";ln$; 

6130 PRINT "Auswahl be-"j 
6140 PRINT "enden." 

6150 ÜINDÜW SWAP 3 
6160 fl Ie 2 elg=0:a*="" 

6170 PRINT ln*;:GHSUB 6300:PRINT ln*: 

6100 a*-UPPER»UNKEY*> 

6190 IF LEN(a* > >0 THEN a=ASC(a*> 

6200 IF a=127 THEN flleanz=0:fIlezeLg~0:RE 
TURN 

6210 IF a-71 QR Ca>239 AND a<244) OR a=13 
THEN GOSUB 6300 ELSE 6100 

6220 f F a = 240 THEN fF fllezelg > 0 THEN fl 
Iezelg=fiIezelg *1 

6230 IF a=241 THEN IF fllezelg < flJeanz-l 
THEN p 11ezeig-filezelg+1 
6240 IF a = 242 THEN IF fllezelg > 15 THEN f 
11 ezeIg=f[ lezelg -16 

6250 IF a = 243 THEN IF fllezelg < flleanz - 
16 THEN f1Iezelg =f1|ezelg+16 
6260 IF a=13 AND flleflag-1 THEN flletflJe 
zelg)=ABS(fl]e(fllezelg)=0) 

6270 IF a=7l AND Plleflag-0 THEN PRINT ln* 

! tGOSUB 5300 i PR I NT ln*j «.RETURN 

6260 IF a =71 THEN RETURN 

6290 a=0:a*:GOTO 6170 

6300 REM 

6310 REM Filename platzieren 
6320 REM 

6330 x=15*INT( t iIezeig/16)+1 
6340 y B 2*f11eze1g MOD 16 
6350 LOCATE x,y 

6360 IF f1le(f1lezelg)si THEN PRINT CHR*(2 

46) ; ELSE PRINT" "; 

6370 PRINT f1le*(f1lezelg); 

6360 IF f1 le(f1lezeig) = l THEN PRINT CHR*l2 

47) ; ELSE PRINT" "; 

6390 RETURN 

6400 REM 


13613 
[5753 
[23263 
C 17043 
C17313 
L1169] 
[3613 
[ 19153 
[20483 
C12173 
[9323 
(1359 3 
[22973 
17893 
I1372] 
[3510] 

[3509] 

136371 

[3216] 

[3326J 

[3646] 

[4431] 

(61533 

[ 2020 ] 
[1674] 
[2721 
[17941 
[2721 
(22163 
[9701 
[6723 
[3142 J 


6470 x = 42: y ~1 C10533 

6480 LOCATE x,y:PRINT STR ING*(12."-") [10443 

6490 b* = " " T533 

6500 LOCATE x,y:PRINT b*;ln*;:IF LEN(b*)=1 L40Ö73 
2 THEN PRINT" ELSE PRINT"-"; 

6510 PRINT ln*; C6593 

6520 a*="" 13883 

6530 WHI LE a*-"" (9333 

6540 a*-UPPER*(INKEY*) [7893 

6550 UEND [3903 

6560 IF a*«CHR*C13> THEN 6720 16613 

6570 IF a*=" " AND LEN(b*)>0 THEN 6610 [1203) 

6500 IF af=CHR*(127) THEN 6640 CB693 

6590 IF a*<CHR*(40) QR af>CHR*(90)THEN 652 C218ÖJ 
O 

6600 IF a*<CHR*(64) AND &*>CKR*(57) THEN 6 C25553 
520 

6610 IF LEN< b*) < 12 THEN b* = b* 

6620 IF LEN < b*)=8 THEN b*-b*+". 

6630 GOTO 6500 
6640 REM DEL * Taste 
6650 IF LEN (b*) = 0 THEN 6500 
6660 b* = LEFT»(b*,LEN < b*)-l) 

6670 IF LEN(b*) B ß THEN 6660 
6660 LOCATE x + LEN(b*)+1,y 
6690 IF LEN(bf)-11 THEN PRINT M 
INT 

6700 IF LEN (b*)=7 THEN PRINT""; 

6710 GOTO 6500 
6720 IF b*="" THEN 6750 
6730 a*=file*(fllezel?) 

6740 I REN,8b*.0a* 

6750 WINDOW SWAP 2:CLS:RETURN 
6760 REM 

6770 REM Parameter ausgeben 
6780 REM 

6790 f1IefIag=0:COSUB 5900 
6000 IF f1Ieanz=0 THEN RETURN 
6810 a*«f1leSCfllezelg) 

6820 CLS:PR I NT:PR I NT "Fileparameter von " 
a*;" : ":PR I NT 
6030 IFILEPAR,0a* 

6840 a • =PEEK(S«7221 > «-PEEK ( 8.7222) »256 
6850 PRINT "Startadresse : " ; 1 n* a ! ; in* 

6060 a * =PEEK(it7223) ♦ PEEK < 6.7224 ) *256 
6070 PRINT "Fl leiaenge t ";!n*ja!;ln* 

6080 a*-RICHT*(BIN*(PEEK (4,7220 1,0). 4» :a-0 
6090 PRINT "Filetyp r "j!n* : 

6900 IF LEFTtla*,3)-"000" THEN PRINT 
IC Programm :a=l 

6910 IF LEFT* Ca*,3) = "001 rt THEN PRINT 


l 16303 
L 19133 
[ 430 3 
[405 3 
[066 3 
[10853 
[ 16233 
[16093 
ELSE PR [26093 

[13623 
[438 3 
[ 909 ] 

11543 3 
[7163 
[ 2172 J 
[2721 
[11263 
[2723 
[12163 
C 1327 J 
(15433 
von [ 1890 ] 


[13013 
[11963 
C 3797 J 
C 97 S) 

(2065 3 
C 1932 I 

[24743 
BAS (37513 


6970 PRINT "Einsprungsadre 

n* 

6080 PRINT "Belegte Blocks : " 

6990 1 =Si 7290 : t =0 

7000 IF PEEKt 1)=0 THEN 7040 

7010 PRINT HEX*(PEEK( 1 ), 2 );" 

7020 1'1 + ix t=t+liIF t MOD 16 =0 THEN 
7030 GOTO 7000 

7040 |F t MOD 16 <>0 THEN PRINT 
7050 PRINT "Anzahl belegte Blocks : " 

7100 RETURN 
7110 REM 

7120 REM Flleverfolgar an / aus 
7130 REM 
7140 CLS 

7150 IF fl IeIen>0 THEN filelen -0:PRI 
er Fl IeverfoJger ist ausgeschaItet. ": 
N 

7160 f 1 lef 1 ag- 0 :G 0 SUB 5900 
7170 IF f 1 )eanz =0 THEN RETURN 
7180 a*«f 1 Ie*(f 1 lezelg) 

7190 CLS:PR I NT "Bitte warten !!?" 

7200 !FlLEPAR, 0 a* 

7210 1=0 

7220 POKE 4 , 9400 ♦ 1 , PEEK< 4 , 7290+1 ) 

7230 1 = 1*1 

7240 IF PEEK ( 4 . 7290 + 1 ) > O THEN 7220 
7250 f 1 lelen=l:f 1 lename*=a* 

7260 RETURN 
7270 REM 

7280 REM File laden 
7290 REM 

7300 f 1 leflag = 0 :G 0 SUB 5900 
7320 IF f 1 Ieanz =0 THEN RETURN 
7320 a*=fIle*(fllezelg) 

7330 CLS:PR J NT a*;" wird geladen." 
7340 LOAD a* 

7350 END 
7360 REM 

7370 REM Fl Ie starten 
7380 REM 

7390 f 1 leflag= 0 :GOSUB 5900 
7400 IF f 1 Ieanz =0 THEN RETURN 
7410 a* = f 1 Ie*(f 1 lezelg) 

7420 CLS:PR 3 NT a*;" wird gestartet." 
7430 RUN a* 

7440 END 
7450 REM 

7460 REM Fehlerbehandlung 
7470 REM 

7480 CLS: PR I NT ln*;"Fehler üüf.'lM" 
7490 GOTO 230 
7500 REM 

7510 REM •»»MiMONiii»« Ende 


"; 1 n S;a!j 1 (2073 3 


C 3486 3 

[14023 

C 1030 ] 

[ 1279 ] 

[25101 

[ 355 ] 

C 1131 ] 

[ 4009 ] 

[5553 
[272 3 
[ 1214 ] 
[2721 
[91 3 
[ 8073 ] 


[1216) 

[13273 

[1543 3 

[21173 

[13011 

[4203 

[11163 

1444 3 

(8593 

[11243 

r r >55) 

[272 3 

£6183 

[2723 
[1216J 
[1327] 
C1543) 
[11103 
[405 3 
[1103 
[272 3 
[11923 
£272 3 
[12163 
C1327] 
[1543] 
[1391] 
[41 ] 

C110) 
(272) 

[1600) 
[272 3 
CiÖ39) 
[4233 
[272 3 
[1547] 


aerdatel 


£31783 


a= 1 


6920 IF LEFT*(a*, 3 >=" 011 " THEN PRINT 
tdatel ";r a =1 


THEN IF RIGHT*(a*, 4 ) -"L" THEN C 44133 


6930 IF 
PRINT 

6940 IF a =0 THEN PRINT " Unbekannt (";PEEK 12365 ) 
( 7220 );")"; 

6950 PRINT ln* [5353 

6960 a ! =PEEK ( 8,7225 ) +PEEK ( 8.7226 > ■ 256 £ 1170 ) 


7520 REM 
7530 CLS:PR INT 

7540 PRINT "Soll das Programm w 
ndet werden J 

7550 PRINT " j i n* ; *» N H jin*;"> 
7560 a•="" 

7570 ÜHILE b * <>"N" AND a*<>"J" 
7530 a*=UPPERS(INKEY*) 

7590 UEND 

7600 IF a*="N" THEN RETURN 
7610 CALL 0 


£ 272 ] 

£ 356 ] 

bee £ 4561 ] 

£ 2008 ) 
[368 3 
C 1480 ) 
[769 3 
[3903 
[ 1415 ] 
C 251 ] 


CPC 


FIS 919,- F1-X 

709,- 

SP-256 279,- SP-512 

379,- 

SP-256 mit BOS 2.0 

349,- 

KIT 256 Aufrüstkit für SP-256 

99,- 

Traktoraufsatz für NLQ-401 

65- 

CPC MousePack 

199,- 

! 10 5,25“ DS/QO Diskette für vortex LW 

35,-! 

! 10 3" CF2 Disketten von Maxell 

79,-! 

! 10 3" CF2-DD Disketten 

109,- ! 

Turbo Pascal 

215- 

Turbo Pascal mit Graphikunterstützung 

275- 

Turbo Graphix Toolbox CPC 6128 

215,- 

Arche extrem schnelle Dateiverwaltung 

79- 

Vokabeltrainer tür Englisch und Latein 45 

—/55.— 

Verbentrainer Englisch 1 39, 

—/49,— 

CLONE 

66,- 

CPC-ROM professionelles DFÜ-Programm 


für CPC und Joyce 

139,- 

! Platinenkit CPC 

149,- 1 



Joyce 

! 5.25" Zweitlaufwerk 

1 

! Qualitatslaufwerk incl. Gehäuse. 

1 

! (Metall oder Plexiglas), 

1 

! Adapter und Einbauanleilung 

1 

! 1 MB Kapazität, voll FD-2 kompatibel 

1 

! 

569 - 1 


! vortex 20 MB Festplatte WD-2000 tür Joyce 

L998,- I 

! Speichererweiterung aut 512 K 

79,- I 

! FD-2 3” Zweitlautwerk, 1MB Kapazität 

589 - ! 

Bildschirmfilter 

59,- 

DR Draw prof Zeichenprogramm 

179,- 

DR Graph 

179,- 

dBase II 1 Wordstar / Multiplan 

je 179,- 

Turbo Pascal 

215,- 

M&T Finanzbuchhaltung 

189,- 

Vokabeltrainer für Englisch und Latein 

59,- 

Verüentrainer ENGLISCH 1 

59,- 

1 IDA Faktura 

298,- ! 

I IDA Fibu 

298,- ! 



PC 1512 

! Festplatten tür den PC 

! 

! vortex 20 MB Drivecard 

1320,- ! 

! 20 MB Einbaulestpiatte mit Controller 

1299,- ! 

Speichererweiterung auf 640 KB 

79,- 

2 Diskettenlaufwerk für PC 1512 

429- 

Leistungsstarkes Qualitätsnetzteil 

428,- 

Bildschirmfilter tür PC 1512 

59,- 

Druckerkabel 

49- 

10 5,25“ DS/DD Disketten für PC 1512 

22- 

Turbo Pascal deutsch 

285- 

! Window Adress 

98,- ! 

! Window Kasse 

98,- ! 

! Carat Lager PC 

289,- ! 

I Algo Auftragsbearbeitung 

398,- ! 


I NEC P6 206 Zeichen pro Sekunde, 24 Nadeln 

1355,- ! 



Händleranfragen erwünscht! 

Alle Preise zzgl Versandkostenanteil! 

Der Versand ertolgt per Nachnahme oder Vorauskasse 
(2 % Skonto). 


MyWord 

Die professionelle Textverarbeitung für den PC 1512! 

MyWord arbeitet mit Wordstar 3/ (R) kompatiblen Steuerco 
des und bietet alle Funktionen desselben! 

- jederzeit abrufbares Hilfsmenü 

- Sortierfunktion im Text! 

- Layoutvorgaoe 

- Text bedingt mit Graphik mischbar 

- leistungsfähige Adressverwaltung mit MailMerge 

Diskette mit ausf. Handbuch 220,— 


Platine-PC 

Dieses leistungsfähige Entwicklungssystem reduziert die 
Entwicklungszeiten von Layouts enorm! 

- integrierter Bauteileeditor 

- komfortable Bedienung 

- Druckerausgabe des Layouts 

- Plotterausgaoe (Option) 

- Zoomfunktion (Option) 

Diskette mit ausf Handbuch ab 269.— 


TG-Soft 

Thomas Gmscti 


Offersdorf 5 ■ 8491 Rimbach - Tel. (09941) 37 65 


4'87 PC 51 


























































I Software-Review 



amx Pagemaker 

Hersteller: AMX 
Vertrieb: Fachhandel 
Steuerung: wahlweise Joystick, 
AMX Maus, Tastatur 
Monitor: Farbe/Grün 
Programm: 100% M-Code 
Preis: 145,—DM 

CPC 464 K CPC 6128 Kl 

CPC 664 K mindest. 128K Ram 


Pagemaker fast permanent auf die Dis¬ 
kettenstation zugreift, ein Umstand, 
der bei manchen Arbeiten schnell zu 
einer Diskettenwechselorgie ausartet. 
Abhilfe schafft hier ein zweites Lauf¬ 
werk, das auch vom Programm unter¬ 
stützt und angesprochen wird. 

Der größte Mangel des vorliegenden 
Programmpaketes ist die zwar aus¬ 
führliche, aber in Englisch gehaltene 
Anleitung. Doch auch der Anwender, 
der der englischen Sprache mächtig 
ist, wird bald feststellen, daß hier noch 
einige andere Mägel verborgen.sind. 
So werden dort einige Features be¬ 
schrieben, die im eigentlichen Pro¬ 
gramm gar nicht enthalten sind und 
andere, über die der Pagemaker wirk¬ 
lich verfügt, werden nicht erwähnt. 


AMX Pagemaker ist ein Programm 
zum Erstellen und Drucken von Zei¬ 
tungen, Plakaten, Geburtstagskarten 
und vielem mehr. Leider braucht ein 
Programm, das derartig viele Featu¬ 
res und Optionen aufweist, entspre¬ 
chend viel Speicherplatz. Im Grunde 
genommen kann der Pagemaker auf 
jedem Rechner der CPC-Reihe betrie¬ 
ben werden, sofern der Rechner über 
ein auf 128K erweitertes RAM verfügt 
(CPC 6128 oder CPC 464, 664 mit 
Speichererweiterung). Außerdem fällt 
beim ersten Anwenden auf, daß der 




Im im Mt Tritt 

Cäj 5t : Kif£ 

Das «st Odie-festn 

■>0ö bt Tscjfcr 

•Du Ist Fit lütli Feit 

Sa ul firn» feuti 
•.[es r. 'foxr *ve 

\ßi iflUtfaiift 
'fe ist Standard Hak 

Das Ist Staaol 

l*S ifl IhMtfiMl 
hi lit hlt II) 


Auf diesem Bild sehen Sie einige Gehversuche, die 
unser Reviewer mit dem Pagemaker nach kurzer Ein¬ 
arbeitungszeit zusammenstellte. Sehr gut können Sie 
darauf erkennen, welche feinen Möglichkeiten dem 
Anwender zum Formatieren von Texten beim Page¬ 
maker zur Verfügung stehen. 


Der erste echte Pluspunkt, den der Pa¬ 
gemaker auf seinem Konto verzeich¬ 
nen kann, ist die ausgezeichnete und 
wohldurchdachte Handhabung, die im 
wesentlichen über Pull-Down-Menues 
geschieht. Allerdings fiel auch hier 
sehr schnell der Umstand auf, daß Pa¬ 
gemaker trotz der 128K nicht alle Fe¬ 
atures und Funktionen gleichzeitig im 
Speicher halten kann und deshalb im¬ 
mer wieder auf die Diskettenstation 
zugreift. Pagemaker ist ein Pro¬ 
gramm, das, wie bereits erwähnt, dem 
Anwender die Möglichkeit gibt Tex¬ 
te und Grafiken zu erstellen, zu bear¬ 
beiten, zu layouten und zu gestalten. 
Die Texte, die der Anwender zu be¬ 
arbeiten wünscht, können entweder 
mit der Keyboard-Option direkt in das 
Pagemaker Programm eingegeben 
werden, oder aber, bereits als ASCII- 
File vorhandene Texte, eingelesen 
werden. Zum Modifizieren dieser 
Texte bietet das Programm einige Fe¬ 
atures, die sonst nur bei großen Satz- 
computem oder wesentlich teureren 
Rechnern wie dem Mclntosh zu fin¬ 
den sind. Texte können in vorgegebe¬ 
ne Flächen eingesetzt und auf die 
Ränder dieser Flächen formatiert wer¬ 
den, egal wie ausgefranst oder eckig 
diese sind. Auch die Größe der benö¬ 
tigten Fläche (endgültiges Ausdruck¬ 
format) ist variabel und vom Benutzer 
manipulierbar. Allerdings stellt Page¬ 
maker die Seiten nur bei kleineren 
Formaten komplett auf dem Monitor 
dar, Formate wie DIN-A4 beispiels- 
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Eine fertige Seite, die komplett mit Pagemaker er¬ 
stellt wurde. Abgesehen davon, daß bei der Auflö¬ 
sung, die der CPC erreicht, die einzelnen Pixel noch 
sichtbar sind, durchaus professionelle Qualität. 


weise werden in Teilstücken auf dem 
Bildschirm gezeigt. Eine Tatsache, an 
die der Anwender sich wohl erst ein¬ 
mal gewöhnen muß; auf jeden Fall ist 
diese Lösung anfangs ein wenig ver¬ 
wirrend. 

Zur Gestaltung von Texten stellt der 
Pagemaker 20 verschiedene Schriftty¬ 
pen zur Verfügung und weist einen 
Editor auf, mit dem eigene Schriftbil¬ 
der erstellt und gespeichert werden 
können. Außerdem können die Texte 
invertiert oder gespiegelt werden. 

Ein weiteres, sehr nützliches Feature 
bei der Gestaltung ist das »Ghosting«. 
Der Pagemaker sieht eigentlich nur 
drei verschiedene Möglichkeiten der 
Textdarstellung vor: schwarz, weiß, 
invertiert. Ghosting ermöglicht die 
Kombination aller drei Möglichkeiten, 
und achtet automatisch darauf, daß je¬ 
de Komponente der geghosteten Area 
eine andere Farbe bzw. Darstellung 
erfährt als Teile, die direkt dort an¬ 
schließen oder zum Teil überlagert 
werden. Wie gesagt kann Pagemaker 
auch Grafiken und Texte miteinander 
kombinieren, zu diesem Zweck findet 
sich eine, wenn auch nicht gerade um¬ 
fangreiche Grafiksammlung auf der 
Diskette. Es besteht allerdings auch 
die Möglichkeit, eigene Grafiken zu 
editieren und zu speichern. Der dafür 
vorhandene Editor ist zwar nicht ge- 
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rade luxuriös, aber dafür wohldurch¬ 
dacht. Er enthält alle notwendigen Op¬ 
tionen und verzichtet auf unnötige 
Spielereien. Natürlich findet der An¬ 
wender noch viele weitere nützliche 
Features, die hier nicht im einzelnen 
erörtert werden können. Jedoch möch¬ 
te ich an dieser Stelle noch auf das 
Drucken der fertigen Seiten eingehen. 
In der vorliegenden Version unter¬ 
stützt der Pagemaker acht verschiede¬ 
ne Drucker. 

Der Anwender kann zwischen drei 
verschiedenen Druckarten wählen: 

A) DRAFT: 

Ein Draftausdruck entspricht von der 
Druckqualität einem Entwurf, der dem 
Anwender zeigen soll, was er bisher 
so zusammengebastelt hat. Eine Hard¬ 
copy in DRAFT-Qualität dauert ca. 
sechs Minuten. 



Mouse Madness. Dieses Bild, das dem Spielfeld von 
Marble Madness nachempfunden ist, demonstriert 
eindrucksvoll die grafischen Möglichkeiten des Pa¬ 
gemakers. 


B) STANDARD: 

Ein Ausdruck mittlerer Qualität und 
mittlerer Druckgeschwindigkeit. Der 
Drucker brauchte ca. 13 Minuten da¬ 
für. Versieht man den Drucker mit ei¬ 
nem neuen Farbband, sind die 
Ergebnisse, die im Standard-Mode er¬ 
reicht werden, durchaus akzeptabel. 

C) NTQ: 

Ein Ausdruck in NTQ-Qualität dau¬ 
ert ca. 75 Minuten, liefert aber dafür, 
den tadellose Zustand des Druckers 
vorausgesetzt, Druck-Qualität. Das 
heißt, NTQ-Ausdrucke können pro¬ 
blemlos als Kopier- oder Reprovorla¬ 
ge verwendet werden. 

Nulzaffekl Badienungs- Doku- Grafik Aroeiis- Preis/ 

freundlichkeit menlaticn gGsehwmd'g- Leistung 

keil 



Pagemaker wird den Herstellern von 
hochtechnisierten Satzsystemen sicher¬ 
lich kein Kopfzerbrechen bereiten, ei¬ 
gentlich will er das auch gar nicht. 
Herausgeber von Schülerzeitungen, 
Clubmagazinen und ähnlichem werden 
im Pagemaker eine Möglichkeit fin¬ 
den, mit wenig Aufwand und kurzer 
Einarbeitungszeit Ergebnisse zu erzie¬ 
len, die sonst nur durch den Einsatz 
von viel Geld (Satz, Montage, Layout) 
und kompliziertem Gerät (Satzcompu¬ 
ter, Lichttische usw.) erreicht werden 
können. Vergleichbare Programme, 
die auf anderen Computern laufen, wie 
z.B. der Printshop und der Newsroom 
für den C-64, haben sich schon seit 
langem bewährt und werden in den er¬ 


wähnten Einsatzgebieten schon oft be¬ 
nutzt. Der AMX Pagemaker wird 
diese Lücke in den Reihen der CPC 
Anwendungsprogramme schließen. 
Denn er ist wirklich ein Anwendung¬ 
sprogramm, das etwas leistet und 
Möglichkeiten erschließt, die ohne 
Computer nicht realisierbar sind. 

(SA/HS) 

Multilager 

Hersteller: Rainbow Arts 
Vertrieb: ARIOLASOFT 
Steuerung: Tastatur 
Monitor: Grün/Farbe 
Programm: 100% Maschinensprache 
Preis: 99,- DM 

CPC 464K CPC 664X3 CPC664B 

Das Programm »Multilager« ent¬ 
stammt der MULTISOFT-Reihe und 
besitzt eine Schnittstelle zu verschie¬ 
denen anderen Programmen dieser 
Reihe (z.B. Muititext). »Multilager« 
selbst ist ein Programmpaket, das aus 
einer Fakturierung, einer Lager- und 
einer Kundenverwaltung besteht. Mit 
Hilfe des Programms können schnell 
Rechnungen, Lieferscheine und sogar 
Mahnungen gedruckt werden, wobei 
sogar zuvor der Firmenbriefkopf ein¬ 
gegeben werden kann. Es ist jedoch 
auch möglich, den Firmenkopf nicht 
mit auszudrucken, z.B. wenn sich auf 
dem Papier, auf das Sie drucken wol ¬ 
len, schon ein Briefkopf befindet. Bei 
dem Erstellen von Rechnungen und 
Lieferscheinen wird der Lagerbestand 
automatisch aktualisiert. Jederzeit 
kann eine Inventurliste oder eine Ta- 
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belle der Lagerdefizite auf dem 
Drucker ausgegeben werden. Das Pro¬ 
gramm enthält ein sehr gutes Drucker- 
menue, mit dessen Hilfe es sehr 
einfach, aber dennoch komfortabel an 
jeden beliebigen Drucker angepaßt 
werden kann. Das eigentliche Pro- 
grammm ist in zwei Teile aufgeteilt 
worden: dem Verwaltungs- und dem 
Fakturierungsprogramm. 

Beim Programmstart fragt das Pro¬ 
gramm, ob Sie mit einer DIN- oder 
mit einer ASCH-Tastatur arbeiten wol¬ 
len. Es besteht in beiden Programm¬ 
teilen die Möglichkeit, die Belegung 
der DIN-Tastatur am Bildschirm an- 
zeigen zu lassen. 

Im Verwaltungsteil des Programmpa¬ 
kets kann der Benutzer neue Artikel- 
und Kundendateien erstellen. Auf ei¬ 
ne Diskette passen bis zu 2000 Artikel¬ 
oder 1000 Kundendatensätze. Die Ein¬ 
gabe der Daten erfolgt mit Hilfe eines 
sehr komfortablen Editors. 

Selbstverständlich können alle Daten¬ 
sätze angezeigt, verändert oder ge¬ 
löscht werden. Diese Dateien können 
nach beliebig wählbaren Kriterien aus¬ 
gewertet und durchsucht werden. Ver¬ 
schiedene Joker können bei der 
Auswertung einer Datei benutzt wer¬ 
den, so kann z.B. nach Personen ge¬ 
sucht werden, deren Nachname mit 
»Ge« oder »Go« beginnt und die in ei¬ 
nem Ort, der nicht Eschwege heißt, 
aber mit einer Postleitzahl, die entwe¬ 
der kleiner als 4000 ist oder mit einer 
7 beginnt, wohnen. Zu diesen Such¬ 
vorgängen benutzt das Programm ein 
Indexregister, das den Zugriff auf ein 
bestimmtes Feld, z.B. die Kunden¬ 
nummer, vereinfacht. Das Feld, auf 
das sich das Indexregister bezieht, 
können Sie selbst wählen, und so Zu¬ 
griffszeiten vermindern, indem Sie das 
von Ihnen meistbenötigte Feld als Ba¬ 
sis für das Indexregister nehmen. 

Es sollte auch erwähnt werden, daß für 
jeden Kunden ein Rabatt, den er er¬ 
halten soll, eingegeben werden kann. 
Für den Rabatt wird jedoch keine Pro¬ 
zentzahl eingegeben, sondern die Zif¬ 
fern 0 — 9, die stattdessen eingegeben 


werden können, werden bestimmte 
Prozentwerte zugeordnet. 

Soll die Datei ausgedruckt werden, so 
können verschiedene Druckarten ge¬ 
wählt werden. Sogar die Reihenfolge 
und die Länge der Felder kann für den 
Ausdruck verändert werden. Damit 
können Inventurlisten erstellt werden, 
die exakt Ihren Vorstellungen und Be¬ 
dürfnissen entsprechen. 

Die Zehnertastatur des Rechners kann 
mit häufig benutzten Texten insgesamt 
bis zu 100 Zeichen belegt werden. Al¬ 
le Änderungen, die an den ursprüng¬ 
lichen Parametern sowohl des Ver¬ 
waltungs- als auch des Fakturierungs¬ 
programms gemacht werden, können 
selbstverständlich abgespeichert und 
später wieder eingeladen werden. 
Auch sind noch einige nützliche Dis¬ 
koperationen wie z.B. Formatieren 
oder Anzeigen des Inhaltsverzeichnis¬ 
ses im Programm enthalten. Mit Hil¬ 
fe komfortabler Menues kann der 
Benutzer die verschiedenen Optionen 
der einzelnen Programmteile aus¬ 
wählen. 

Ohne das Programm neu starten zu 
müssen, kann man vom Verwaltungs- 
menue in das Fakturierungsprogramm 
(und umgekehrt natürlich auch) ge¬ 
langen. 

Das Fakturierungsprogramm: 

In diesem Programmteil können Sie 
Dateien, die mit dem Verwaltungspro¬ 
gramm erstellt und bearbeitet worden 
sind, weiter be- und verarbeiten. Da¬ 
zu können sowohl der Firmenkopf als 
auch die Prozentsätze, die bei der Ein¬ 
gabe der Daten schon beschrieben 
wurden, definiert werden. Auch hier 
können wieder Druckparameter einge¬ 
geben werden, die diesmal jedoch wei¬ 
tere Daten zum Ausdrucken von 
Rechnungen und Lieferscheinen ent¬ 
halten. 

Sollen Rechnungen geschrieben wer¬ 
den, so kann der Benutzer zunächst 
entscheiden, ob er den Firmenkopf 
ausgedruckt haben möchte und danach 
muß die Adresse entweder von Hand 
eingegeben oder aus einer zuvor er- 
öffneten Datei eingelesen werden. 
Hierbei können Joker zum Durchblät- 
tem der Datei benutzt werden. Danach 


sollten Sie die gewünschten Artikel 
eingeben, wobei wieder die Auswahl 
zwischen manueller oder »automati¬ 
scher« Eingabe besteht. 

Hat der Benutzer das Einlesen eines 
Artikels aus einer Datei gewählt, so 
wird hier die eingegebene Menge von 
der, in der Datei stehenden, noch vor¬ 
handenen Menge abgezogen und das 
Lager somit automatisch auf dem 
neuesten Stand gehalten. 

Nachdem alle Artikel eingegeben wor¬ 
den sind, können weitere Eingaben ge¬ 
macht werden, die für das Berechnen 
des Endbetrags, der beim Liefer¬ 
scheindruck nicht ausgegeben wird, 
wichtig ist. 

Leider ist es nicht möglich, zur glei¬ 
chen Zeit eine Artikel- und eine Kun¬ 
dendatei geöffnet zu lassen. Das heißt, 
daß in einer Rechnung entweder der 
Artikel oder die Adresse des Kunden 
von Hand eingegeben wird. Beim 
Ausgeben der Mahnung kann zuvor 
noch ein Mahntext eingegeben wer¬ 
den, ansonsten entspricht diese Option 
der Option »Rechnung schreiben«. 

Um das Lager auf dem neuesten Stand 
zu halten, können Sie Lagerzu- und 
-abgänge in die Artikeldatei eingeben. 

Nutzetteki Bedienung»- Doku- Grafik Arbciis- Prois/ 

freundlichkeil rremaüon geschwindig- Leistung 



Fazit: 

Das Programm, das mit einem recht 
ausführlichen deutschen Handbuch ge¬ 
liefert wird, ist für den Einsatz in klei¬ 
nen Firmen ohne weiteres geeignet. 
Wenn noch die Möglichkeit vorhan¬ 
den wäre, zwei Dateien gleichzeitig 
geöffnet zu lassen, wäre dieses Pro¬ 
gramm noch besser geschäftlich ein¬ 
zusetzen. 

Leider sind auch die Diskoperationen 
nicht einsetzbar, wenn eine Datei ge¬ 
öffnet ist. Dies bedingt manchmal et¬ 
was längere Wartezeiten. Der Preis für 
dieses Programm ist jedoch mehr als 
gerechtfertigt. (A. Grass) 
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into the Eagles 
Nest 

Hersteller: Pandora 
Vertieb: Fachhandel 
Steuerung: Joystick 
Monitor: Farbe/Grün 
Preis: Kass. 35,—/Disk. 45,— 

CPC464H CPC 66423 CPC6128& 

Langsam scheint es mir so, als gingen 
der Softwareindustrie die Ideen in 
punkto Bösewichter aus. Nach wieder- 
wärtigen Aliens, finsteren Gangster¬ 
typen und noch anderem Gesockse, 
sind bei »Into the Eagles Nest« mal 
wieder die bösen Nazis bzw. die 
Wehrmacht dran. 

Irgendwann während des Zweiten 
Weltkrieges wird ein Mann für einen 
speziellen Job gesucht. Dieser Job ist 
derart gefährlich, daß bereits zwei an¬ 
dere Spezialisten, die vor Ihnen mit 
dem Auftrag betraut wurden, in Ge¬ 
fangenschaft gerieten. 

Es geht um die Burg Adlernest, in der 
das Oberkommando der Wehrmacht 
derzeit sein Hauptquartier unterhält. 
Gelänge es nun, diese Festung mit 
Mann und Maus in die Luft zu spren¬ 
gen, wären damit die Deutschen oh¬ 
ne Führung und der Krieg so gut wie 
gewonnen. 

Den beiden Agenten, die vor Ihnen 
versuchten, das Adlemest auszuheben, 
gelang es, vor ihrer Gefangennahme 
noch in der ganzen Burg Sprengladun¬ 
gen anzubringen. Sind Sie gerissen ge¬ 
nug, gegen die feindliche Übermacht 
zu bestehen und ihre gefangenen Ka¬ 
meraden zu befreien und auch noch die 
verborgenen Sprengladungen zu 
zünden? 

Mit Into the Eagles Nest stellt sich ein 
recht junges Softwarehaus vor, das 
nun mit Elan auch auf den Schneider 
Markt drängt. Hier in Deutschland 
wird die Idee, Nazis als Widersacher 
zu verwenden, sicher nicht gerade Bei¬ 
fallsstürme auslösen, doch möge man 



Mangels anderer 
qualifizierter Böse¬ 
wichter mußten bei 
diesem Spiel mal 
wieder die Nazis 
herhalten. In der 
Rolle eines Welt- 
krieg-II-Rambos muß 
der Spieler hier in 
eine Burg eindrin- 
gen, in der das 
Oberkommando der 
Wehrmacht gerade 

sein Hauptquar¬ 
tier unterhält. Sie 
müssen in das Adler¬ 
nest eindringen und 
die Burg in die lM.fr 
sprengen. 


auch nicht vergessen, daß gerade die 
Engländer, und von dort kommt das 
Spiel ja, ein unverhältnismäßig ande¬ 
res Verhältnis zu diesem Teil unserer 
Geschichte haben. 

Im wesentlichen ähnelt das Spielge¬ 
schehen Gauntlet, wie dort, wird ein 
Labyrinth aus Räumen, Korridoren 
und Kammern in der Draufsicht auf 
den Monitor gebracht. Die Grafik 
kann nur als edel bezeichnet werden, 
farbenfroh und detailliert werden her¬ 
umliegende Gegenstände, Stühle, Ti¬ 
sche, Kisten und sogar Waschbecken 
und Toiletten gezeichnet. 

In der Burg gibt es insgesamt fünf ver¬ 
schiedene Stockwerke, die allerdings 
nur mittels eines Aufzugs erreicht wer¬ 
den können, um diesen zu benutzen, 
muß jedoch erst einmal ein Liftpaß ge¬ 
funden werden und der funktioniert 
nur einmal. 

Daß sich außer Ihnen noch Unmengen 
von bösen Nazis in der Burg befinden, 
brauche ich wohl nicht extra zu sagen. 
Einzige Mängel des Spiels sind zum 
einen der miserable Sound und zum 
anderen das ein wenig mißratene 
Scrolling. Bleiben wir erst einmal 
beim Sound, der sich während des ei¬ 
gentlichen Spiels auf erträgliche 
Schußgeräusche beschränkt, doch ist 
das Spiel zu ende, rasselt etwas aus 
dem Lautsprecher, das man nicht ein¬ 
mal als Freund klassischer Punk- 
Musik als Melodie bezeichnen möch¬ 
te. Allein dieser verheerende Pausen¬ 
sound bringt den Spieler dazu, ein 
neues Spiel zu starten, nur um diese 
entsetzliche Musik nicht mehr hören 
zu müssen. 


Das Scrollig ist zwar auch nicht gera¬ 
de berühmt, im Vergleich zum Sound 
allerdings sogar noch erträglich. Ge- 
scrollt wird in vier verschiedene Rich¬ 
tungen: nach oben, unten, links und 
rechts. Nähert man sich beispielsweise 
dem rechten Bildschirmrand und be¬ 
tritt das letzte Viertel des Monitors, 
verschiebt sich der ganze Bildschirm¬ 
inhalt in die betreffende Richtung. 

S<)i(*4o* Bedienuncjs- Doku- Gralik Sound Preis/ 

freundlichkeit menlalion Leistung 



Summa summarum ist »Into the Ea¬ 
gle Nest« trotz des mißratenen Sounds 
und der doch recht geschmacklosen 
Rahmenhandlung ein Spiel geworden, 
das durch eine sehr hohe Motivation 
besticht. Und die tolle Grafik läßt auch 
so manches vergessen. 

(HS) 

Aliens 

Hersteller: Electric Dreams 
Vertrieb: Fachhandel 
Monitor: Farbe/Grün 
Steuerung: Joystick/Tastatur 
Preis: ca. 39,— DM 

CPC4641X1 CPC664&] CPC6128K 

Es kommt nicht oft vor, daß es einem 
Science Fiction Film gelingt, Horror¬ 
film-Elemente zu transportieren, oh¬ 
ne daß das Ganze am Ende lächer- 
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lieh wirkt. Noch seltener kommt es 
vor, daß zu einem solchen Film eine 
Fortsetzung gedreht wird, der es ge¬ 
lingt, den ersten Teil an Qualität und 
Spannung sogar noch zu übertreffen. 
Und fast nie passiert es, daß zu die¬ 
ser Fortsetzung auch ein Computer¬ 
spiel erstellt wird, das die Qualität der 
Vorlage erreicht. 

Die Rede ist von Aliens. Die Nostro- 
mo, ein riesiger Erzfrachter eines gro¬ 
ßen Konzerns befindet sich auf dem 
Transit von einer in den galaktischen 
Randbereichen gelegenen Minenkolo¬ 
nie zur Erde. Die aus sieben Personen 
bestehende Besatzung verbringt den 
größten Teil der Reise im Tiefschlaf. 
Der Flug verläuft ohne Zwischenfäl¬ 
le, bis der Zentralrechner der Nostro- 
mo ein Funksignal registriert, das 
zweifelsohne extraterrestrischen Ur¬ 
sprungs ist. 

Gemäß seiner Programmierung weckt 
der Computer die Besatzung aus dem 
Tiefschlaf und fliegt den unwirtlichen 
kleinen Planeten, von dem das Signal 
kommt, an. Als sich die Besatzung 
daran macht, die Ursache des eigenar¬ 
tigen Funksignals zu erkunden, ent¬ 
decken sie ein außerirdisches Raum¬ 
schiff, das schon vor langer Zeit auf 
dem Planeten notgelandet ist. Die 
Crew des Fremden Schiffes ist tot, und 
sie verstarb offensichtlich nicht auf na¬ 
türliche Art und Weise. 

Bei weiteren Untersuchungen des 
Schiffes stoßen die Männer auf eine 
riesige Höhle, die unter dem Schiff 
liegt und durch einen senkrechten 
Schacht mit ihm verbunden ist. In die¬ 
ser Höhle werden die Männer mit der 


gefährlichsten Lebensform der Gala¬ 
xis konfrontiert, den Aliens. 

Eines dieser Wesen, deren Lebenszy¬ 
klus in einem Ei beginnt, fällt einen 
Mann der Erkundungstruppe an. In¬ 
nerhalb von kurzer Zeit entwickelt sich 
das Wesen von einem scheinbar nicht 
sonderlich gefährlichen Parasiten zu 
einem hochintelligenten Killerorganis¬ 
mus, der innerhalb kürzester Zeit 
sechs der sieben Besatzungsmitglieder 
tötet. 

Erst nach einem atemberaubenden 
Showdown gelingt es Ripley, dem 
letzten verbliebenem Besatzungsmit¬ 
glied, das Wesen zu vernichten und 
sich selbst in einer Raumfähre außer 
Gefahr zu bringen. Dort versetzt sie 
sich in Tiefschlaf und macht sich auf 
den langen Weg zur Erde. 

57 Jahre später und einen Film wei¬ 
ter wird Ripley gefunden. Natürlich 
hat man sich an der Konzernspitze 
schon eine Menge Gedanken um den 
Verbleib der Nostromo gemacht. Ri¬ 
pley wird vor einen Untersuchung¬ 
sausschuß zitiert, der allerdings ihren 
Erklärungen wenig Glauben schenkt. 
Aus einem guten Grund, der Planet, 
auf dem Ripley dem tödlichen Auße¬ 
rirdischen begegnete, wurde schon vor 
langer Zeit besiedelt und von den 
Aliens war keine Spur zu entdecken. 

Erst als der Funkkontakt mit Askeron 
abreißt, ist man gewillt, Ripleys Er¬ 
zählungen Glauben zu schenken. Zu¬ 
sammen mit einer Truppe von 
bestausgebildeten Space Marines soll 
sie auf Askeron nach dem Rechten 
sehen. 


Dort angekommen müssen die Solda¬ 
ten feststellen, daß sic es hier mit ei¬ 
nem unerbittlichen und tödlichen 
Gegner zu tun haben. Und dieses Mal 
schleicht nicht nur ein Alien umher, 
sondern hunderte. 

Schon nach der ersten Konfrontation 
mit den fremden Wesen bleiben von 
den dreißig Marines nur noch sechs 
Mann übrig. An dieser Stelle setzt die 
Handlung des Computerspiels ein. Sie 
übernehmen die Aufgabe, die verblie¬ 
benen sechs Personen zu leiten. Ihr 
Ziel ist es, die Alienkönigin zu finden 
und zu vernichten. Allerdings ist dann 
nicht nur die Königin, sondern, wie 
gesagt, auch hunderte von Aliendroh¬ 
nen, die auf der Suche nach Opfern 
überall im Komplex der Siedlung um¬ 
herstreifen. 

Über die Grafik und die Animation des 
Ganzen kann man nicht meckern, 
zwar gehört Aliens nicht gerade zu den 
absoluten grafischen Highlights, ist 
aber überdurchschnittlich gut. Auf 
dem Monitor präsentiert sich das Spiel 
wie ein Ausblick auf eine Komman¬ 
dokonsole. In mehreren Windows las¬ 
sen sich zum einen die Lebensfunk¬ 
tionen der sechs verbliebenen Perso¬ 
nen ablesen, zum anderen kann in ei¬ 
nem weiteren Window der Ausblick, 
der sich der gerade gewählten Person 
bietet, eingeblendet werden. Dieses 
Bild wird von einer Videokamera ge¬ 
sendet, die jedes Mitglied der Truppe 
mit sich führt. 

Sie als Spieler müssen nun die Solda¬ 
ten durch die labyrinthartige Station 
steuern, jedesmal, wenn die gerade ge¬ 
steuerte Spiel figur in einen Raum 
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Der Film war nichts 
für schwache Gemü¬ 
ter. Das Spiel ist span¬ 
nend und fesselnd. 
Plötzlich auftauchende 
Aliens sorgen immer 
wieder für Adrenalin¬ 
schocks. Sollte man 
wirklich nicht nachts 
spielen, es könnte 
Schlafstörungen her- 
vorrufen. 


kommt, in dem sich ein Alien befin¬ 
det, ertönt ein Warnsignal. Jetzt 
kommt es auf schnelle Reaktionen und 
Zielsicherheit an. Die Blickrichtung 
der Spielfigur kann mittels des Joy¬ 
sticks verändert werden, das Video¬ 
window scrollt dabei etwa so, als 
würde sich die Person im Raum dre¬ 
hen, so gilt es, den im Raum befind¬ 
lichen Alien so schnell wie möglich zu 
lokalisieren und ihn mit gezielten 
Schüssen außer Gefecht zu setzen. Je 
nachdem wo Sie das Wesen treffen, 
bedarf es einer unterschiedlichen An¬ 
zahl von Schüssen, um es zu vernich¬ 
ten. Mit dem Auftauchen der Aliens 
machen sich überall in der Station bio- 
mechanoide Gewächse breit, die eben¬ 
falls beseitigt werden müssen. Denn 
nimmt der Bewuchs überhand, kann 
cs passieren, daß die Stromerzeugung 
beeinträchtigt wird und plötzlich das 
Licht in der Station ausfällt. Einziges 
echtes Manko des Spieles ist das Feh¬ 
len einer Kompaßfunktion, in den 
Räumen und Korridoren der Station 
kann man sich leicht verirren, und ist 
das erstmal passiert, ist es sehr schwie¬ 
rig, sich wieder zurechtzu finden. 

Im Laufe des Spieles muß auch auf an¬ 
dere Dinge geachtet werden, so kon¬ 
trollieren Sie ja jeweils nur eine 
Person. Es kann Vorkommen, daß ein 
Alien in einen Raum vordringt, in dem 
sich eines Ihrer Crewmitglieder befin¬ 
det, das Sie gerade nicht kontrollieren. 
Dann müssen Sie sie so schnell wie 
möglich umschalten und die Gefahr 
beseitigen. Auch muß immer darauf 
geachtet werden, daß die Soldaten mit 
ausreichend Munition versorgt sind, 
denn das Nachladen ist nur in der Waf¬ 
fenkammer der Station möglich. 


5p«*t*de« Bedenungs- Doku- Grafik Sound Preis/ 
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Aliens ist ein Spiel, das auch nach 
mehrmaligem Gebrauch nichts von 
seiner unheimlichen Atmosphäre und 
Spannung einbüßt, man könnte sagen, 
daß es mit einer Adrenalinschub- 
Garantie ausgeliefert wird. (HS) 

TRIVIAL PURSUIT 

Hersteller: Domark 

Vertrieb: Fachhandel 

Steuerung: Tastatur 

Monitor: Farbe/Grün 

Preis: Kass. ca. 45, —/Disk. ca. 55,— 

CPC 464 K3 CPC 6128 1X1 

CPC 664 ca Joyce H 


Seit einiger Zeit erfreut sich das Fra¬ 
gespiel Trivial Pursuit einer immer 
weiter wachsenden Beliebtheit. Bei 
diesem Brettspiel hat der Spieler mit 
dem größten Allgemeinwissen die be¬ 
sten Gewinnchancen. Es geht nämlich 
im wesentlichen darum, immer neue 
Fragen aus sechs verschiedenen Wis¬ 
sensbereichen richtig zu beantworten. 
Die Spieler setzen zu Anfang des 
Spiels je eine Figur ins Zentrum des 
Spielplanes. Auf diesem Spielplan ist 
ein Achteck, durch das drei Diagona¬ 
le gezogen sind, aufgezeichnet. Ein 
Spieler nach dem anderen würfelt nun, 
und zieht dann seine Spielfigur auf ei¬ 
nes der in Frage kommenden Felder. 

Die Felder sind verschiedenfarbig an¬ 
gelegt und jede Farbe stellt ein be¬ 
stimmtes Themengebiet dar. Je nach¬ 
dem, in welchem der angebotenen 
Themenkreise der Spieler glaubt die 
besten Ergebnisse zu erzielen, kann 
der Spieler nun seine Figur auf das be- 
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Als Brettspiel feiert 
Trivial Pursuit der¬ 
zeit allenthalben rie¬ 
sen Erfolge. Das 
Computerspiel ent¬ 
spricht in etwa der 
Vorlage. 

Positiv ist anzumer¬ 
ken, daß man sich 
hier auch Gedanken 
darüber gemacht 
hat, wie man das 
Spiel durch die Mög¬ 
lichkeiten des Com¬ 
puters aufwertet. 


treffende Feld ziehen. Hier wird ihm 
nun eine Frage gestellt: kann er diese 
Frage richtig beantworten, darf er 
noch einmal würfeln und sich noch¬ 
mals ein Feld aussuchen. Allerdings 
gibt es auch Felder, die grau eingefarbt 
sind und keinem Fragenkreis angehö¬ 
ren, auf diesen Feldern darf der Spie¬ 
ler sogleich noch einmal würfeln. 
Außerdem gibt es auf dem Spielplan 
noch sechs Felder, die größer sind als 
die anderen, eines von jeder Farbe. 
Gelangt ein Spieler auf ein solches 
Feld, bekommt er auch hier, je nach 
Farbe, eine Frage aus dem entspre¬ 
chenden Themenkreis gestellt. Beant¬ 
wortet er diese Frage richtig, bekommt 
er ein Sternchen in der Farbe des eben 
gefragten Wissensgebietes. Und der¬ 
jenige, dem es nun gelingt, als erster 
sechs verschiedenfarbige Sternchen zu 
erringen, der ist Sieger. 

Dies sind in aller Kürze die Regeln, 
nach denen Trivial Pursuit gespielt 
wird. Natürlich können sie auch mo¬ 
difiziert werden, die Anleitung gibt da¬ 
zu auch gleich den einen oder anderen 
interessanten Hinweis. Dieses Brett¬ 
spiel, das sich, wie bereits erwähnt, 
wachsender Beliebtheit erfreut, liegt 
nun auch als Computerspiel vor. 

Die Regeln, nach denen hier gespielt 
wird, unterscheiden sich so gut wie gar 
nicht von der Brettspielversion. Na¬ 
türlich hat man sich auch Gedanken 
gemacht, wie man der Computerver¬ 
sion des Spiels neue Akzente abgewin¬ 
nen könnte. Dies ist allerdings nur in 
beschränktem Umfang gelungen. Die 
Fragen, die ja beim Brettspiel von ei¬ 
nem anderen Mitspieler vorgetragen 


werden, stellt hier ein kleines Männ¬ 
chen mit dem Namen TP, was offen¬ 
sichtlich für Trivial Pursuit steht. 
Einige der Fragen des Computerspiels 
sind beim Brettspiel nicht enthalten 
bzw. unmöglich. Beispielsweise spielt 
TP ab und an ein Musikstückchen vor, 
und möchte vom Befragten wissen, 
wer es komponiert hat, oder wann es 
komponiert wurde. 

Eine weitere interessante Komponente 
sind die Fragen, bei denen dem Spie¬ 
ler der Umriß einer Insel gezeigt wird. 
TP möchte dann wissen, um welche 
Insel es sich handelt. 

SBedenungs- Doku- Grafik SourW Preis/ 
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Alles in allem handelt es sich hier um 
eine gelungene Brettspieladaption, die 
zusätzlich zur grundsätzlichen Struk¬ 
tur des Spieles die Grafik- und Sound¬ 
möglichkeiten des Rechners hinzufugt. 
Die vielfältigen Optionen, die es er¬ 
möglichen, einen Spieler aus einer 
Partie aussteigen zu lassen, oder einen 
neuen Spieler in die Runde aufzuneh¬ 
men oder aber eine Statistik, in der der 
Durchschnitt der richtig beantworte¬ 
ten Fragen eines Spielers dargestellt 
wird, verleihen dem Spiel zusätzlichen 
Reiz. Wer allerdings das Brettspiel 
schon besitzt, sollte sich darüber im 
klaren sein, daß Trivial Pursuit in der 
Computerversion vom eigentlichen 
Spiel her wenig neues bringt. Dieje¬ 
nigen unter Ihnen, die das Spiel noch 
nicht besitzen, aber schon mit dem Er¬ 
werb desselben geliebäugelt haben, 
und außerdem noch einen CPC Ihr Ei¬ 
gen nennen, sollten sich das Compu¬ 
terspiel kaufen. Zum einen hat es den 
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Vorteil, daß man es auch alleine spie¬ 
len kann, zum anderen ist TP ein klei¬ 
ner Entertainer, der die Fragen in 
einer gelungenen Form vorträgt. 

Ach, und ehe ich es vergesse, natür¬ 
lich gibt es auch für das Computerspiel 
zusätzliche Fragensätze. 

(HS) 

THE COONIES 

Hersteller: US-Gold Datasoft 
Vertrieb: Fachhandel 
Steuerung: Joystick/Tastatur 
Monitor: Farbe/Grün 
Preis: ca. 29,— DM 

CPC 4641X1 CPC664& CPC6128K 

Eigentlich müßte Ihnen beim Lesen 
des Titels dieser Review sogleich der 
Name eines sehr bekannten Filmes 
eingefallen sein. Wenn nicht, dann ge¬ 
hören Sie wirklich zu einer Min¬ 
derheit. 

Die Goonies war einer der erfolgreich¬ 
sten Kinofilme der letzten zwei Jah¬ 
re, in dem der amerikanische 
Filmwunderknabe Steven Spielberg ei¬ 
ne Gruppe von Heranwachsenden auf 
eine haarsträubende Jagd nach einem 
verlorenen Piratenschatz schickte. 

Die Goonies sind sozusagen ein Club 
von Kindern, die alle in einem Stadt¬ 
teil eines kleinen Ortes in Maine le¬ 
ben. Dieser Stadtteil soll nun abge¬ 
rissen werden, um einem Tennisplatz 
für Neureiche zu weichen. Natürlich 
finden die Kinder solche Pläne gar 
nicht lustig, aber etwas dagegen un¬ 
ternehmen können sie nicht. 

Erst als sie beim Herumstöbem auf ei¬ 
nem Dachboden eine alte Schatzkarte 
finden, fassen sie wieder Hoffnung. 
Diese Karte zeigt den Weg zum Hort 
des einäugigen Willie, der um 1800 in 
dieser Gegend als Pirat sein Unwesen 
trieb. Obwohl sich jedermann über die 
Karte und die Legenden, die sich um 
Willie und seinen Schatz ranken, lu¬ 
stig macht, glauben die Kinder fest 
daran und machen sich auf die Suche. 



Mit den Goonies fei¬ 
ert das gute alte 
Genre der Jump and 
Run Spiele neue Tri¬ 
umphe. Acht ver¬ 
schiedene Bilder, die 
bis zum Rand mit 
kniffeligen Puzzels 
und kritischen Ti¬ 
mingproblemen an¬ 
gefüllt sind, sorgen 
für eine langan¬ 
haltende Spielmotiva¬ 
tion, zu der die 
interessante zwei 
Spieler-Option noch 
ein zusätzliches tut. 


Tatsächlich finden Sie den Eingang zu 
einem unterirdischen Labyrinth von 
Stollen, die offensichtlich nicht natür¬ 
lichen Ursprungs sind, und Sie ent¬ 
decken die Fratellis — eine Familie 
von Verbrechern: Mutti Verbrecher, 
erster Sohn Verbrecher, zweiter Sohn 
Verbrecher, dritter Sohn... nein, der 
ist kein Verbrecher. 

Slot, so der Name des dritten Sohnes, 
ist das, was man im Volksmund als ei¬ 
ne Mißgeburt bezeichnet, denn sein 
Gesicht ist völlig entstellt, doch im Ge¬ 
gensatz zu seinem Aussehen ist Slot 
eine Seele von Mensch und schlägt 
sich schon bald auf die Seite der 
Goonies. 

Nachdem nun der Eingang zu Willies 
unterirdischem Schatzversteck gefun¬ 
den ist, fangen die Abenteuer aber erst 
richtig an, denn einerseits verstand 
sich Willie sehr gut auf das Bauen von 
tödlichen Fallen, andererseits sind den 
Goonies nun die Fratellis auf den Fer¬ 
sen, die nun ebenfalls nach Willies 
Schatz suchen. 

Mit den Goonies gelangte nach langer 
Zeit wieder einmal ein Plattform-Spiel 
auf meinen Tisch. Zwar sind die 
Jump-and-Run-Spiele nicht gerade 
meine absoluten Favoriten, aber trotz¬ 
dem muß ich sagen, daß mir die Goo¬ 
nies doch gut gefallen haben. 

Jedes der acht Bilder, über die das 
Spiel sich erstreckt, hat eine entspre¬ 
chende Szene im Film, und um das 


Problem, das man lösen muß, um wei¬ 
terzukommen, richtig zu erkennen, ist 
es schon recht gut, den Film einmal 
gesehen zu haben. Allerdings ist das 
nicht zwingend notwendig, denn dem 
Spiel liegt ein Hintsheet bei, in dem 
alle wichtigen Hinweise gegeben 
werden. 

Während des Spieles läuft ein Musik¬ 
stück, das der Filmmusik nachempfun¬ 
den ist ab. 

Grafisch gesehen ist das Spiel recht or¬ 
dentlich geworden. Am besten gefiel 
mir allerdings die Zwei-Spieler- 
Option. Egal in welchem Bild Sie sich 
gerade befinden, immer müssen zwei 
Goonies gleichzeitig gesteuert werden, 
um weiterzukommen. 

Spielen zwei Spieler, so übernimmt 
Spieler A die Rolle des ersten Goonies 
und Spieler B die des zweiten; spielt 
man allerdings alleine, muß man bei¬ 
de Goonies steuern, mittels des Feu¬ 
erknopfes schaltet man dann zwischen 
den agierenden Goonies hin und her. 

3o»eWee Bedienung!*- Doku- Grafik Sound Preis/ 
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Wer Jump-and-Run-Spiele mag, der 
ist hier goldrichtig, denn die Goonies 
erfordern nicht nur Geschicklichkeit 
und Timing, sondern auch Köpfchen. 

(HS) 
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GEM-Graphik 


Hauptaufgabe des GEM-Systems ist 
es, dem Anwender eine möglichst ein¬ 
fache Bedienung seines Computers zu 
ermöglichen. Gelöst wurde diese Auf¬ 
gabe durch die grafische Darstellung 
der Benutzeroberfläche. Nebeneffekt 
dieser Lösung ist, daß GEM eine 
höchst komfortable Schnittstelle zur 
Welt der Computergrafik ist. 

Wie man diese Schnittstelle in der Pro¬ 
grammierung verwendet, erfahren Sie 
in einem der folgenden Hefte. Dieses 
Mal wollen wir uns lediglich mit den 
Endprodukten, zwei neuen GEM- 
Applikationen, befassen. 

Schwerpunktmäßig geht es bei der 
diesmonatigen Softwarebesprechung 
also um Grafikprogramme unter 
GEM. Digital Research, der Erfinder 
von GEM, hat gleich drei Grafikpro¬ 
gramme für den PC anzubieten. Eines 
davon, GEM-PAINT, dürfte Ihnen be¬ 
kannt sein, es gehört zum Lieferum¬ 
fang des PC 1512. Wozu, fragt man 
sich, braucht man eigentlich drei Gra¬ 
fikprogramme, eines sollte doch ei¬ 
gentlich ausreichen? 

Tatsächlich benötigt man auch nicht 
alle drei Grafikprogramme. Jedes der 
Programme wendet sich einem ande¬ 
ren Anwenderkreis zu. GEM PAINT 
ist zum Beispiel ein ziemlich einfaches 
2D-Malprogramm, welches zwar sehr 
viele Funktionen bietet und an Ge¬ 


schwindigkeit und Bedienungskomfort 
allen Ansprüchen gerecht wird, bei 
dem sich der Anwenderkreis jedoch 
auf den Hobbyisten und Gelegenheits¬ 
künstler beschränken wird. 

GEM DRAW hat schon ein wenig 
professionellere Ansprüche. Hier wur¬ 
den größtenteils die Grundzüge eines 
2D-CAD-Systems integriert. Die An¬ 
wendungsbereiche gehen von Werbe¬ 
fachleuten, die Angebote erstellen 
wollen, bis hin zu Schülern und Stu¬ 
denten, die ihre Examensarbeiten mit 
anschaulicher Grafik unterlegen 
wollen. 


GEM GRAPH dient letztendlich dem 
Business-Bereich. Mit diesem Pro¬ 
gramm können Zahlenkolonnen und 
Tabellen in eindrucksvoller grafischer 
Darstellung wiedergegeben werden. 
Die Anwendung von GEM GRAPH 
ist jedoch nicht so eingegrenzt, wie die 
der beiden anderen Programme, da 
der Aufgabenbereich sich deutlich von 
dem eines Zeichenprogrammes ab¬ 
hebt. 


GEM PAINT vorzustellen ist ein mü¬ 
ßig Ding, da es ja sowieso jeder PC 
1512 Anwender besitzt, ob er nun will 
oder nicht. Aber die beiden anderen 
Applikationen wollen wir einmal et¬ 
was genauer unter die Lupe nehmen. 


GEM DRAW 

Wie Eingangs bereits erwähnt, hat 
GEM DRAW schon eine erheblich 
professionelleren Anspruch als GEM 
PAINT. Der Anwender ist hierbei in 
der Lage, mit vorgefertigten Bildele¬ 
menten zu arbeiten. Solche Bildele¬ 
mente können Kreise, Quadrate, 
Polygone oder Texte sein. 

In Abb. 1 sehen Sie zum Beispiel, wie 
ein einfacher Kreis gemalt wurde. Da¬ 
mit das ganze nicht so eintönig aus¬ 
sieht, erhielt er noch ein Linien- 
fillmuster zur Verschönerung. Danach 
wurde ein weiteres Bildelement ein¬ 
gefügt. Dieses Element, bedeckt zwar 
den Kreis, löscht ihn jedoch nicht, wie 
das bei GEM Paint beispielsweise der 
Fall wäre. Sie müssen sich die Zeich¬ 
nung einfach als einen Stapel von 
Overheadfolien vorstellen, auf die die 
verschiedenen Elemente aufgelegt 
wurden. Wenn man nun nachträglich 
ein Element entfernen möchte, zieht 
man einfach die entsprechende Folie 
aus dem Stapel. 

Das Gesamtbild bleibt erhalten, nur 
das eine Element, egal ob Kreis oder 
Box, ist veschwunden. Die herausge¬ 
nommene Folie kann nun jedoch auch 
auf den Stapel gelegt werden und be¬ 
deckt damit die anderen Elemente, oh¬ 
ne das Informationen verlorengehen. 

Diese Art zu Zeichnen ist natürlich im 
technischen Bereich sehr viel effekti¬ 
ver als das einfache Beschreiben des 
Bildschirmspeichers. Ein Innenein- 
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richter kann sich beispielsweise den 
Grundriß einer Wohnung Zeichen, da¬ 
nach Möbelstücke als Bildelemente de¬ 
finieren und solange löschen und 
herumschieben, bis er meint, die Ein¬ 
richtung würde jetzt stimmen. 

Wenn man bedenkt, daß man dafür 
vor kurzer Zeit noch ein paar Möbel¬ 
packer und gute Nerven gebraucht hat, 
ist dies doch schon ein gewaltiger 
Fortschritt. 

Ganz anders Funktioniert dagegen 
GEM Graph. 


GEM GRAPH 

ist ein Programm für den Business- 
Bereich, mit ihm kann anhand einer 
Wertetabelle blitzschnell eine reprä¬ 
sentative Geschäftsgrafik erstellt wer¬ 
den. Wie das funktioniert, sehen Sie 
in Abb. 2. 

In eine Tabelle werden die darzustel¬ 
lenden Werte eingegeben. Danach 
wird eine Grafikkarte ausgewählt und 


den Rest macht GEM schon von ganz 
alleine. 

In Abb. 2 sehen Sie die Auswertung 
unserer Demo-Tabelle. Gewählt wur¬ 
de die Darstellung 3D-Balken. Genau¬ 
so sind auch mehrschichtige Grafiken, 
Liniendiagramme, Tortendarstellung 
und Landkarten möglich. Die Land¬ 
karten können über einen mitgeliefer¬ 
ten MAP-Editor noch modifiziert 
werden. 

Wem ein einfacher Stapelbalken zu 
einfach ist, der kann anstelle des Bal¬ 
kens auch vordefinierte Symbole ein- 
setzen. In unserem Falle hätte sich 
beispielsweise ein Stapel Computer 
angeboten und die Grafik wesentlich 
attraktiver gestaltet. 

Firmen, die ihre Auswertungen von 
Jahresberichten, Verkaufszahlen und 
ähnlichem von Grafikern anfertigen 
lassen, werden sich schnell über den 
praktischen Nutzen eines solchen Pro¬ 
grammes im klaren sein. 


Für den Heimanwender, wird sich je¬ 
doch kaum eine sinnvolle Anwendung 
finden lassen. 


Fazit 

Drei GEM-Grafikprogramme wurden 
vorgestellt. Die Unterteilungen der 
Anwendungsbereiche läßt sich folgen¬ 
dermaßen einteilen: 

GEM PAINT HOBBYBEREICH 

GEM DRAW SEMIPROFES¬ 

SIONELL 
GEM GRAPH PROFES¬ 
SIONELL 


Welches Programm nun das richtige 
für welchen Anwender ist, muß jeder 
selbst ermessen. Generell läßt sich sa¬ 
gen, daß jedes der Programme seinem 
speziellen Aufgabenbereich gerecht 
wird. 

(TM) 
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PC BASIC2 

verständlich 

Folge 3 

ln dieser Folge von »PC BASIC2 
verständlich« haben wir uns vorge¬ 
nommen, einen kleinen Taschen¬ 
rechner zu programmieren, der vier 
Rechenarten durchführen kann. Bis 
Sie jedoch in der Lage sind, diesen 
Rechner zu entwickeln, müssen wir 
noch klären, was Strings sind. Auch 
wollen wir uns noch etwas über den 
»Input« Befehl unterhalten. 


Input 

Das “Input“ Kommando gehört zu den 
wichtigsten Befehlen, die wir zur 
BASIC2-Programmierung benötigen. 
Mit diesem Befehl können allgemei¬ 
ne Daten, welche über die Tastatur 
eingegeben werden, in Variablen oder 
Strings eingelesen werden. Den Be¬ 
griff Variable haben wir in der letz¬ 
ten Folge unserer Serie bereits geklärt, 
was Strings sind, wollen wir etwas 
später erwähnen. 

Bisher haben wir Variablen, oder 
Platzhalter, immer im Programm mit 
einer Zahl belegt, wie es folgendes 
Beispiel veranschaulicht: 

variable = 121 

Wenn nun aber die Zahl von Pro¬ 
grammstart zu Programmstart ver¬ 
schieden ist, wie zum Beispiel die 
Eingabe der aktuellen Temperatur, 
dann ist es schon ziemlich lästig, im¬ 
mer das BASIC-Programm abzubre¬ 
chen und mit dem Editor die 
entsprechende Zeile, in der die Varia¬ 
ble belegt wird, zu ändern. Um dies 
zu umgehen, gibt es den »Input«- 
Befehl, den wir in dieser Folge nur in 
seiner Grundfunktion erklären wollen, 
da das Kommando »Input« bei 
BASIC2 einige sehr interessante Fea¬ 
tures aufweist. Der Syntax kann in et¬ 
wa mit dem des »Print«-Befehles 
verglichen werden. Er sieht folgender¬ 
maßen aus: 

- Input variable 

Wenn Sie BASIC2 gerade geladen 
haben, tippen Sie bitte im Dialog- 


Modus »Input zahl« ein. Wie der 
BASIC2-Interpreter gebootet wird, ha¬ 
ben wir schon in Folge zwei behan¬ 
delt, wenn Sie es nicht mehr wissen, 
wiederholen Sie bitte den entsprechen¬ 
den Abschnitt. Haben Sie die Kom¬ 
mandozeile eingegeben, so werden Sie 
feststellen, daß im »Ergebnis-1 Fen¬ 
ster« ein Fragezeichen ausgedruckt 
worden ist. Anscheinend will uns der 
Computer etwas fragen. Diese Vermu¬ 
tung trifft zu, er erwartet eine Einga¬ 
be, oder Englisch, einen Input. Geben 
Sie eine beliebige Zahl ein. Nachdem 
Sie dies getan haben erscheint im 
Dialog-Window wieder die »Rcady«- 
Meldung. Was mag nun geschehen 
sein? Durch unseren Befehl »Input 
zahl« forderten wir den Computer auf, 
auf eine Eingabe (Input) zu warten, 
dies hat er getan. Anschließend tipp¬ 
ten wir über die Tastatur eine Zahl ein, 
nach dem Drücken der Return-Taste 
war der Computer wieder im »Ready- 
Modus«. Wollen wir untersuchen, was 
mit der Variable »Zahl« geschehen ist. 
Wissen Sie noch, wie man überprüft, 
welchen Wert eine Variable hat? Ge¬ 
nau, mit dem Kommando »Print«. Ge¬ 
ben Sie also »Print zahl« ein, und Sie 
werden feststellen, daß der Schneider 
PC im Ergebnis-Fenster gerade die 
Zahl ausdruckt, die Sie zuvor auf der 
Tastatur eingegeben haben. Versuchen 
Sie noch etwas, geben Sie erneut das 
Kommando »Input zahl« ein und über¬ 
prüfen Sie jeweils den Wert, den die 
Variable annimmt. 

Für den »Input«-Befehl gibt es ähnlich 
dem »Print«-Kommando eine Mög¬ 
lichkeit, Text auf dem Monitor aus¬ 
zudrucken. Genauso wie bei »Print« 
lautet der Syntax hierfür: 

Input “ < text > “;variable 

Neu für uns ist der Strichpunkt, oder 
auf Englisch der Semikolon vor der 
Variablen. Dieser Strichpunkt gehört 
zum Input-Befehl, wenn dieses Kom¬ 
mando einen Text ausgeben soll. Ver¬ 
suchen Sie doch einmal die Eingabe 
von “Input “Deine Glückszahl“varia- 
ble“ und Sie werden feststellen, daß 
der Rechner eine Fehlermeldung 
ausgibt. 

Haben Sie vielleicht schon versucht, 
Buchstaben einzugeben. Wenn nicht, 
holen Sie dies nach. Geben Sie erneut 


das Kommando “Input zahl“ ein, 
nachdem das Fragezeichen im 
Ergebnis-Fenster ausgedruckt worden 
ist, tippen Sie irgendein Wort ein. 
Wenn Sie die Return-Taste betätigt ha¬ 
ben, werden Sie feststellen, daß der 
Schneider PC ein Fenster öffnet in 
dem sich eine Fehlermeldung befindet. 
In der Meldung heißt es, es wurde ein 
Fehler in der Eingabe verursacht, und 
so ist es auch, wir haben versucht, eine 
Variable mit einem Buchstaben zu be¬ 
legen. Dies führt uns zum nächsten 
wichtigen Teil der BASIC2-Pro- 
grammierung, zu den Strings. 


Die Zeichenketten 


Bis jetzt konnten wir Variablen nur mit 
Zahlen belegen. Wie aber können Sie 
ein Wort in einen Platzhalter spei¬ 
chern? Dazu gibt es in der BASIC- 
Programmierung die Strings. Strings 
kann man mit dem deutschen Wort 
»Zeichenkette« übersetzen. Eine Zei¬ 
chenkette ist in etwa nichts anderes als 
eine Variable, in der man Zeichen und 
Zahlen speichern kann. Um einen 
String von einer Variable unterschei¬ 
den zu können, erwartet BASIC2 hin¬ 
ter jedem Variablcnnamen ein Dollar¬ 
zeichen »$«. Die Variable »Name« als 
String würde dann demnach »Name$« 
heißen. 

Um zu überprüfen, ob dies stimmt, 
tippen Sie bitte im Dialog-Modus den 
Befehl “Input “Dein Name“;name$“ 
ein. Geben Sie nun nach dem Erschei¬ 
nen des Fragezeichens Ihren Namen 
ein und betätigen Sie die Return-Taste. 

Siehe da, es erscheint keine Fehler¬ 
meldung. Sehen wir doch einmal, ob 
nun auch der Name in der Variable 
»Name$« enthalten ist. Nach der Ein¬ 
gabe von “Print name$“ müßte jetzt 
Ihre Eingabe beziehungsweise Ihr Na¬ 
me auf dem Monitor ausgegeben wer¬ 
den. Ist dies nicht der Fall, wieder¬ 
holen Sie bitte diesen Schritt noch 
einmal. 

Der String ist also, um es noch ein¬ 
mal zu wiederholen, eine Art Varia¬ 
ble für Zeichen. Ein String darf nie 
länger als 255 Zeichen sein. Bei 
BASIC2 werden Sie es so oder so 
nicht schaffen, eine Zeichenkette grö- 
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ßer als 255 Zeichen zu belegen, da 
BASIC2 gar keine längere Eingabe ge¬ 
stattet. 

Ebenfalls wie Variablen können 
Strings im Programm mit Werten be¬ 
legt werden. Hierfür gilt der gleiche 
Syntax, jedoch muß hinter dem 
»Gleich«-Zeichen ein Anführungszei¬ 
chen folgen. Versuchen Sie die Zei- 
chenkette »hallo$« mit dem Wort »Wie 
geht es?« zu belegen. Haben Sie alles 
richtig gemacht, müßte Ihre Eingabe 
wie folgt ausgesehen haben: 

hallo$ = “Wie geht es?“ 

Wie Sie sehen, müssen die Anfüh¬ 
rungsstriche vorhanden sein, andern¬ 
falls wird eine Fehlermeldung aus¬ 
gegeben. 


Mit Strings rechnen? 

Die Bedeutung eines Strings haben wir 
geklärt, aber kann man mit einem 
String ebenso wie mit einer Variablen 
auch rechnen? Versuchen wir doch 
einmal folgendes Programmbeispiel: 

a$= “3“ 
b$=“4“ 

Print a$*b$ 

Und geht es? Natürlich nicht. Der 
Computer gibt die Fehlermeldung 
»Unterschiedliche Datentypen« aus. 
Damit hat er auch recht. Mit Strings 
kann man nicht rechnen. Das wäre in 
etwa das gleiche, als versuchten Sie, 
eine Schreibmaschine mit einem Com¬ 
puter zu multiplizieren. Bei diesem 
Beispiel würde auch keine Textverar¬ 
beitung herauskommen. 

Wir merken uns also, daß man nur mit 
Variablen rechnen kann. 

Das Wichtigste von der BASIC2-Pro- 
grammierung haben wir uns schon an¬ 
geeignet, wollen wir einen bereits be¬ 
kannten Befehl ein wenig ausbauen, 
der uns gleich zur Computergrafik 
führt. Der Print-Befehl eignet sich da¬ 
für besonders gut. Wollen wir etwas 
Farbe ins Spiel bringen. Tippen Sie 
“Print"Hallo“ ein. Es erscheint auf 
dem Bildschirm das Wort “Hallo“ in 
schwarzer Farbe. Um nun die Farbe 
zu ändern, bewegen Sie den Mauszei¬ 
ger auf das Farben-Pulldownmenue. 
Hat sich das Menue geöffnet, so 
klicken Sie bitte mit der linken Maus¬ 


taste eine beliebige Farbe in der »Text- 
Spalte« an. Wenn es geht jedoch nicht 
gerade die Farbe schwarz oder weiß. 
Wiederholen Sie das Print-Komman¬ 
do, und...das Wort »Hallo« wird in der 
Farbe auf dem Monitor ausgedruckt, 
die Sie angewählt haben. Versuchen 
Sie ein paar weitere Farben. 


Jetzt kommt Farbe ins Spiel! 

Was wir nun mit Hilfe der Maus und 
des »Farben-Menues« getan haben, 
geht selbstverständlich auch mit einem 
Befehl vom Programm aus. Dalür gibt 
es bei BAS1C2 den Befehl »Colour«, 
der im »Print«-Kommando eingebun¬ 
den sein muß. Im Klartext heißt das 
zum Beispiel, um das Wort »Hallo« rot 
auf dem Bildschirm auszugeben, müs¬ 
sen Sie 

Print Colour(2) “Hallo“ 

eingeben. Die Zahl zwei steht für die 
Farbe Rot. Wollen Sie den Farbcode 
für andere Farben wissen, so müssen 
Sie nur mit der Maus das Farbmenue 
anfahren und die jeweilige Zahl vor 
der Farbe entnehmen. Der Farbpara- 
meter darf nicht größer als 15 und 
nicht kleiner als Null sein, sonst wird 
vom Computer die Fehler-Meldung 
»Unzulässiger Parameter Wert« aus¬ 
gegeben. Probieren Sie mit diesem Be¬ 
fehl etwas herum. Im übrigen ist es 
egal, ob Sie Colour nun mit »u« oder 
ohne »u« schreiben, BASIC2 legt sich 
dabei nicht fest. Auch sind folgende 
Syntaxformen möglich: 

Print Colour(farbe) “ Ctext > “ 

Print Colour(farbe),“ < text > “ 

Print Colour(farbe); “ < text > “ 

Dies bleibt Ihnen überlassen. Ein noch 
viel schönerer Zusatz zum »Print«- 
Kommando, ist »Points(größe)«. Mit 
diesem Kommando können Sie die 
Größe der Zeichen bestimmen. Auch 
dies läßt sich wieder mit einem Me¬ 
nue bewerkstelligen. Bewegen Sie das 
Mousesymbol auf das »Schrift-Menue« 
und klicken Sie »20 Punkt« an. Danach 
schließt sich das Window wieder, wir 
haben somit die Größe auf 20 Punkte 
eingestellt. Um dies zu überprüfen, 
müssen Sie nur mit dem »Print«- 
Kommando ein Wort oder einen Satz 
auf dem Monitor ausgeben. Sie sehen, 


die Buchstaben werden um ein Viel¬ 
faches größer ausgedruckt. 

Ebenso wie beim »Colour«-Befeh! gibt 
es auch hierfür ein Kommando. Der 
Zusatz zu »Print« lautet “Points(grö- 
ße)“. Den Parameter sollten Sie jedoch 
immer aus dem »Schriften-Menue« 
entnehmen, da wir jetzt noch nicht 
wissen, wie wir diese Zahlen selber 
bestimmen können. Dazu benötigen 
wir noch andere Kenntnisse. 
Mittlerweile ist unser Befehl »Print« 
auf folgende Form angewachsen: 

Print Colour (färbe) Points(größe) 
“ < text > “ 

Wie schon erwähnt, bleibt Ihnen die 
Verwendung eines Strichpunktes oder 
eines Kommata selbst überlassen. 
Mit dem »Print«-Kommando werden 
wir uns noch des öfteren auseinander¬ 
setzen müssen, da dieser Befehl in 
BASIC2 besonders leistungsfähig ist. 


Gehe zu! 


Nach diesem etwas leichteren Ab¬ 
schnitt kommen wir noch einmal zu 
dem, ich möchte fast sagen, wichtig¬ 
sten, in der Programmiersprache BA¬ 
SIC. Es ist der »Goto«-Befehl. »Goto« 
wurde aus dem Englischen zusammen¬ 
gesetzt und bedeutet nichts anderes als 
»Gehe zu«. 

Mit diesem Kommando können Sie 
dem Computer befehlen, daß er zu ei¬ 
ner bestimmten Stelle im Programm 
»gehen« soll. Klar ist Ihnen sicherlich, 
daß der »Goto«-Befehl allein für die¬ 
sen Zweck nicht ausreicht, schließlich 
müssen Sie dem Schneider PC auch 
noch mitteilen, wo er »hingehen« soll. 
Für dieses Problem gibt es in der 
BASIC2-Programmiersprache einen 
weiteren, sehr leistungsstarken Befehl, 
der bis jetzt nur bei wenigen BASIC- 
Dialekten angewendet wird. BASIC2 
besitzt diesen Befehl, er heißt »Label«. 
Aufschrift oder Schildchen ist der 
deutsche Begriff für »Label«. Wollen 
wir diese zwei neuen Befehle an einem 
kleinen Programmbeispiel klären. 
Folgender Sachverhalt stellt sich uns. 
Wir wollen irgendein Wort, zum Bei¬ 
spiel »Hallo«, unendlich oft auf dem 
Bildschirm ausdrucken. Auf jeden Fall 
müssen wir das »Print«-Kommando 
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verwenden. Wie aber bringe ich den 
Schneider PC dazu, dies unendlich oft 
zu tun? Für diese Sachlage gibt es nur 
eine Lösung, nämlich die Verwendung 
des »Goto«'Befehles und eines Labels. 
Binden Sie ein »Gotoy«-Kommando in 
Ihr Programm ein, so müssen Sie auch 
den »Label«-Befehl benutzen, dies als 
kleinen Merksatz. Wollen wir die Mu¬ 
sterlösung genauer betrachten. 

REM Übung zu »Goto« 

LABEL anfang 
PRINT “Hallo“ 

GOTO anfang 
END 

Das Programm ist sehr kurz, aber er¬ 
zielt dennoch eine erstaunliche Lei¬ 
stung. Geben Sie das Programm in 
Ihren Schneider PC ein und beobach¬ 
ten Sie was passiert. Um in den Edi¬ 
tiermodus zu gelangen, in dem Sie das 
Programm eingeben müssen, tippen 
Sie bitte »Edit« ein — Sie gelangen in 
den Eingabe- oder Editiermodus. Sind 
Sie mit dem Eingeben fertig, verglei¬ 
chen Sie bitte noch einmal, ob Sie al¬ 
les genauso abgetippt haben, wie es im 
Heft steht. Fertig? - Gut, dann fah¬ 
ren Sie bitte den Mauszeiger in das 
Dialog-Fenster und klicken Sie bitte 
kurz auf die linke Maustaste. Daß 
»Run« der Befehl zum Starten eines 
Programmes ist, haben wir auch schon 
erwähnt. Geben Sie »run« im Dialog¬ 
modus ein und beobachten Sie was 
passiert. Haben Sie alles richtig ge¬ 
macht, so werden Sie feststellen, daß 
der Computer im Ergebnis-1-Fenster 
das Wort »Hallo« ständig ausdruckt. 
Dies würde er unendlich lange tun. 
Betätigen Sie die Control (Ctrl) Taste 
und das Programm wird unterbrochen. 
Experimentieren Sie noch ein wenig 
mit dem kleinen Programm. 


Die Labels 


Das BASIC-Programm hat genau das 
getan, was wir verlangt hatten, es wur¬ 
de. wie von uns gewünscht, »Hallo« 
unendlich oft auf dem Bildschirm aus¬ 
gedruckt. Nach der Kommentarzeile, 
oder der Rem-Zeile steht das erste 
neue Kommando. Mit dem Befehl 
»Label« haben wir ein Etikett an eine 
bestimmte Stelle des Programmes 


»hingeklebt«. Nach dem »Label« folgt 
das Nomen »Anfang«. »Anfang« wur¬ 
de von uns ausgewählt, es hätte auch 
»Hier_geht_es_los« heißen kön¬ 

nen. Ich rate Ihnen aber, auf jeden Fall 
sinnvolle Namen für einen Label zu 
verwenden, da gerade die Labelnamen 
zur besseren Lesbarkeit eines Pro¬ 
grammes beitragen. 

Bei der Benennung von »Labels« gel¬ 
ten die gleichen Regeln wie bei den 
Variablen, also keine Zahl oder Zah¬ 
len zuerst, keine Zwischenräume und 
keine Satzzeichen etc. Nun haben wir 
das »Etikett« gesetzt. Logische Schluß¬ 
folgerung, wir verwenden irgendwo 
ein »Goto«-Kommando. So ist es auch. 
Nach dem »Print«-Befehl, folgt das 
»Goto«. Demnach heißt dieses Kom¬ 
mando »Goto anfang«. Wir »sagen« al¬ 
so dem Schneider PC nichts anderes 
wie: »Gehe zum Label Anfang«. Ist er 
beim Marker »Anfang« angelangt, so 
liest der Interpreter die nächste Zei¬ 
le, also die Programmzeile, in der das 
»Print«-Kommando steht. Das Wort 
»Hallo« wird ausgedruckt, der Com¬ 
puter gelangt wieder an den Befehl 
»Goto anfang«. Er springt wieder zu 
diesem Label, liest die nächste Zeile 
ein, druckt erneut »Hallo« aus, springt 
wieder hoch und so weiter. Dieser 
Vorgang wird vom Computer so lan¬ 
ge wiederholt, bis Sie die Control-C- 
Taste drücken, und damit den Pro¬ 
grammablauf abbrechen. Dieser Ge¬ 
dankengang ist sehr wichtig. Wieder¬ 
holen Sie Ihn deshalb noch einmal. 
Um daS Gelernte zu festigen, wollen 
wir es ein wenig üben. Ich stelle Ih¬ 
nen eine Aufgabe, die so ziemlich al¬ 
les beinhaltet, was wir bis jetzt erlernt 
haben. Zur Aufgabe: 

Schreiben Sie ein Programm, das ein 
beliebiges Wort über die Tastatur ein¬ 
liest und dieses dann auf dem Bild¬ 
schirm unendlich oft ausdruckt. 
Haben Sie eine fertige Lösung im 
Kopf, wenn ja, gehen Sie zu Ihrem 
Schneider PC und programmieren Sie 
die Aufgabe. 

Wollen wir die fertige Musterlösung 
besprechen? Als erstes sollten Sie im 
Programm eine Rem-Zeile stehen ha¬ 
ben, in der der Sinn des Programmes 
vermerkt sein sollte. Diese Zeile ist je¬ 
doch nicht unbedingt erforderlich. 


Dann eine Input-Ab frage. Anschlie¬ 
ßend der Programmlabel und das 
Print-Kommando, gefolgt vom »Go¬ 
to«. Und damit der Computer weiß, 
daß Ihr BASIC-Programm nun been¬ 
det ist, setzen Sie am Schluß des Pro¬ 
grammes noch den »End«-Befehl hin. 
Geschafft! Die Lösung sähe also in et¬ 
wa so aus: 

REM Übungsprogramm 
INPUT “Welches Wort “;wort$ 
LABEL schleife 
PRINT wort$ 

GOTO schleife 
END 


FOR-TO-NEXT 


So schwer dürfte dies nicht gewesen 
sein. Wollen wir noch etwas Neues da¬ 
zu lernen. Diesmal soll der Rechner 
wieder ein beliebiges Wort ausgeben, 
jedoch nur zehnmal. Dazu gibt es ei¬ 
nen, besser zwei, neue Befehle, die so¬ 
genannte »FOR-TO-NEXT«-Schleife. 
In dieser Schleife spielen Variablen ei¬ 
ne große Rolle. Betrachten wir zu¬ 
nächst das Programm. 

REM FOR TO NEXT Anwendungen 
INPUT “Ein Wort “;wort$ 

FOR durchlauf = 1 TO 10 
PRINT wort$ 

NEXT durchlauf 
END 

Neu ist Ihnen die sogenannte »FOR 
TO NEXT«-Schieife. Wir können uns 
gleich merken, daß zu dieser Art von 
Schleife immer ein »Next« gehört, an¬ 
dernfalls gibt BASIC2 die Fehlermel¬ 
dung »NEXT fehlt« aus. Tippen Sie 
das Programm doch einmal ohne 
»NEXT« ein, sie werden feststellen, 
es geht nicht. Wir haben festgelegt, 
daß vom Programm »Hallo« zehnmal 
ausgedruckt werden soll. Und Sie se¬ 
hen, die Zehn kommt in der Schleife 
einmal vor. Es heißt sogar »1 TO 10«, 
also von eins bis zehn. Die Schleife 
sagt nichts anderes als »mach das, was 
zwischen der Schleife und dem »Next« 
steht genau eins bis zehnmal«. Der In¬ 
terpreter liest die Schleife ein, er setzt 
die Variable »durchlauf« auf eins, 
druckt aufgrund des »Print«- 
Kommandos das von uns gewählte 
Wort aus, und trifft schließlich auf den 
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Befehl »Next durchlauf«. Das »Next«- 
Kommando befiehlt dem Computer 
nichts anderes, ähnlich dem »Goto«- 
Befehl, daß er zur Schleife »durchlauf« 
zurückkehren soll. Deshalb auch 
»Next durchlauf«. Dabei erhöht der 
BASIC-Interpreter die Variable 
»durchlauf« um eins und fahrt im Pro¬ 
gramm fort. Er liest wieder das »Next 
durchlauf« ein, springt zur Schleife zu¬ 
rück, erhöht die Variable »durchlauf« 
wieder um eins und so weiter. Dies 
wird so lange ausgeführt, bis der 
Platzhalter »durchlauf« den Wert 10 
angenommen hat, dann fährt der Com¬ 
puter in seinem Programm weiteren 
unserem Fall trifft er auf den »End«- 
Bel'ehl. Das Programm ist beendet. 

Um zu überprüfen, ob die Variable 
wirklich bei jedem Durchlauf um eins 
erhöht wird, fügen wir in das Pro¬ 
gramm eine weitere Zeile ein. Setzen 
Sie bitte »Print durchlauf« in die 
Schleife ein, also hinter oder vor den 
Befehl “Print wort$“. Was geschieht? 

Der Rechner gibt zusätzlich die Zah¬ 


len eins bis zehn aus. Es stimmt also, 
die Variable »durchlauf« wird bei je¬ 
dem Durchgang um eins erhöht. 
Was würde der Schneider PC bei fol¬ 
gendem Beispiel ausdrucken: 

FOR i = 3 to 5 
PRINT i 
NEXT i 
END 

Wissen Sie es? Genau! Er gibt die 
Zahlen 3, 4, 5 aus. Sollten Sie dies 
nicht gewußt haben, so bitte ich Sie, 
den Abschnitt über Variablen in Heft 
2/87, und den Abschnitt über die 
»FOR-TO-NEXT« noch einmal ge¬ 
nauer zu studieren. 

Es ist wieder so weit — Sie sind in der 
Lage eine neue Aufgabe zu lösen. 
Diesmal ist die von mir gestellte Auf¬ 
gabe etwas schwieriger, deshalb ver¬ 
zagen Sie nicht, wenn Sie etwas Zeit 
brauchen, um Sie zu lösen. Überlegen 
Sie erst genau die Gedankenschritte, 
die für diesen Problemfäll notwendig 
sind. Nun zur Aufgabe: 

Schreiben Sie ein BASIC-Programm, 


das erfragt, welche Zahl jeweils von 
eins bis zehn multipliziert werden soll. 
Das heißt, wenn Sie über die Tasta¬ 
tur eine Drei eintippen, so muß der 
Schneider PC jeweils das Ergebnis 
3*1, 3*2, 3*3 und so weiter aus¬ 
drucken. 

Im Programm benötigen Sie die 
»FOR-TO-NEXT«-Schleife. Wollen 
wir die Lösung untersuchen: 

REM 1 mal 1 Programm 
CLS 

INPUT “Eine Zahl “;zahl 
FOR i= 1 TO 10 
ergebnis = i*zahl 
PRINT ergebnis 
NEXT i 

PRINT “Fertig!“ 

END 

Zugegeben, dieses Programm war ein 
bißchen schwierig, deshalb wollen wir 
es erläutern. 

Gleich in der zweiten Zeile entdecken 
Sie ein neues BASIC-Kommando. Es 
lautet »CLS«, was die Abkürzung für 
»Clear Screen« ist. Dies bedeutet 


ZUBEHÖR für alle Schneider-Computer 


Für PCW JOYCE; 



NEU: Papierführung für JOYCE-Drucker 39,- 


- FD-2 (2 Laufw), 1 MB 598,- 

- RAM Erweiterung 

von 256 KB auf 512 KB 

(Original 257-er-Bausteine!) 129,- 

- Bildschirmfilter 59,- 

Für CPC 464. 664. 6128; 

- Bildschirmfilter 

Farbmonit. CTM 640/644 44,— 

- Bildschirmfilter 

Grünmonitor GT 64/65 39,— 


Deutschland: 

ABD Computer ■ Zettachrlng 12 ■ 7000 Stuttgart 80 
Telefon 0711-7150037 


Für den neuen PC 1512: 


Die bessere Lösung!!! 


Hard-disk-kits 

Hard-disk-Bausatz bestehend aus 

- Hard-disk, Kontroller, Kabelsatz 
in Stahlblech-Einbaugehäuse, Stecker¬ 
kompatibel, 

. 20 MB 1398,- 

mit Lüfter (sehr leise) 30 MB 1 698,- 

Front-Blende In Schneider-beige! 


Für den neuen PC: 

- 2. Laufwerk, 360 KB 429,- 

- Hardcard 

Lapine-drive auf Steckkarte mit 20 MB 1 398,— 

Kontroller 30 MB 1 698,— 

- RAM-Erweiterung von 512 KB auf 640 KB 99,- 

- Bildschirmfilter 

für Monochrome- und Farbmonitor 59,— 

Das komplette Zubehör ist bet den Schneider-Computer- 
Händlern erhältlich. Händlernachweis auf Anfrage 

Weitere Händleranfragen willkommen! 


Österreich: 

Wagner Electronics ■ Hauptstraße 171 ■ 3001 Mauerbach 
Telefon 02 22-97 21 66 
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REM Minitaschenrechner 

REM Schneider International BASIC2 Kurs 
REM hy ceB6 

CLEAR RESET 
LABEL anfang 
CLS 

PRINT 

PRINT C0L0URC4D PGINTSC20) "Minitaschenrechner” 
PRINT 

PRINT ”lüas wollen SiB rechnen?” 

PRINT ” *” 

PRINT " /” 

PRINT ” + ” 

PRINT ” 

INPUT "Ihre Wahl ” ; wahl$ 

PRINT 

PRINT ”Ihre Eingabe C*,”;wahl$ 

PRINT 

INPUT "Bitte 1. Zahl eingeben ” ; zahll 
INPUT "Bitte 2. Zahl eingeben ” ; zahl2 

IF wahlS-”*” THEN ergebnis-zahll*zahl2 
IF wahl$=”/” THEN ergebnis-zahll*zahl2 
IF wahl$=”+” THEN ergebnis"zahll*zahl2 
IF wahl$“”~” THEN ergebnis-zahll*zahlB 

PRINT "Ergebnis ;ergebnis 

FOR zeit-1 TO 10000:NEXT zeit 

ergebnis-0 

GOTO anfang 

END 


nichts anderes als »lösche Bildschirm«. 
Bildschirm mag hier etwas übertrie¬ 
ben sein, da dieser Befehl nur das 
»Ergebnis-1 Window« löscht, aber 
hierzu in einer anderen Folge von »PC 
BASIC2 verständlich« mehr. 

Wir haben uns die Aufgabe gestellt, 
eine beliebige Zahl zu nehmen, die wir 
selbst wählen können. Hierfür den »In- 
put«-Befehl. Dann wollten wir diese 
Zahl mit den Skalaren 1 — 10 multipli¬ 
zieren. Nichts ist für dieses Problem 
besser geeignet, als eine »FOR-TO- 
NEXT« Schleife. In dieser Schleife 
wird dann eine neue Variable, der 
Platzhalter »ergebnis« mit einem Wert 
belegt, der sich wiederum aus 
»ergebnis = i*zahl« zusammensetzt. 
Nach dieser Zeile drucken wir die Va¬ 
riable »ergebnis« mit dem »Print«- 
Kommando aus. Wurde die Schleife 
ganz durchlaufen, wird auf dem Bild¬ 
schirm noch die Meldung »Fertig!« 
ausgegeben. Das war das ganze Pro¬ 
gramm. Verändern Sie das BASIC- 
Programm ein wenig. Wie wäre es 
zum Beipiel, wenn die Ergebnisse an¬ 
dersfarbig, oder größer ausgegeben 
werden. Hier bleiben Ihrer Phantasie 
keine Grenzen gesetzt. 


IF-THEN-ELSE 

Wollen wir den letzten BASIC-Befehl 
in diesem Kurs kurz anschneiden. 
Dieses Kommando gehört ebenfalls zu 
den wichtigen BASIC-Befehlen. Der 
Name dieses Kommandos lautet »IF- 
THEN-ELSE«. In dieser Folge wol¬ 
len wir nur »IF-THEN« erwähnen, 
»Else« etwas später. Eine typische An¬ 
weisung mit diesem Kommando könn¬ 
te folgendes Aussehen haben: 

IF variable=3 THEN PRINT “Das ist 
eine 3“ 

Sie werden schon gemerkt haben, hier 
können Variablen oder auch Strings 
überprüft werden. Mit diesem Kom¬ 
mando teilen Sie dem Schneider PC 
mit, er soll, wenn die Variable »va¬ 
riable« gleich drei ist, den Satz »Das 
ist eine 3« ausgeben. Nichts anderes 
bedeutet dies. Sollte der Platzhalter 
»Variable« jedoch einen anderen Wert 


haben, zum Beispiel minus drei, dann 
würde der BASIC-Interpreter einfach 
mit der neuen Zeile forfahren. Dieser 
Befehl hat, wie schon erwähnt, auch 
seine Anwendung bei Strings. Auch 
hier wieder ein Beispiel: 

IFname$= “Franz“ THEN PRINT 
“Hallo Franz“ 

Diese Form der »IF-Abfrage« stellt in 
etwa das gleiche dar. Sollte nun jedoch 
der String »name$« mit »franz« belegt 
sein, so wird der Then-Zweig nicht 
ausgeführt, da für einen Computer 
»Franz« und »franz« nicht das gleiche 
ist. 

Folgende Befehle müßten Sie schon 
an wenden können: 

- Rem 

- Clear Reset 

- Cls 

- Print Colour(farbe) Points(größe) 

- For i=zahll to zahl2 

- Next 


- If a=b then 

— Label xy 

— Goto xy 

- End 

Schon eine ganze Menge. Versuchen 
Sie doch, mit Ihrem bisher angeeigne¬ 
ten Wissen selbst BASIC-Programme 
zu schreiben, dies wäre die beste 
Übung für Sie. 

Zum Schluß noch einen kleinen Ta¬ 
schenrechner (Listing 1), den Sie theo¬ 
retisch schon selbst programmieren 
können. Geben Sie das Programm in 
Ihren Schneider PC ein und machen 
Sie sich klar, weshalb gerade das Pro¬ 
gramm »so« programmiert worden ist. 
Schon sind wir am Ende unseres drit¬ 
ten Teiles »PC BASIC2 verständlich« 
angelangt. Beginnend mit der nächsten 
Folge, wollen wir uns mit der von Lo¬ 
go bekannten Turtle Graphik ausein¬ 
andersetzen, die auch bei BASIC2 
vorhanden ist. 

(Christian Eißner) 
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von cp/m 

Ten a 

Im vorliegenden vierten Teil unserer 
Serie über MS-DOS erfahren Sie ei¬ 
niges über Diskettennamen, lernen 
neue Dienstprogramme kennen und 
erfahren, was es mit DISK.CMD und 
COPY auf sich hat. 

Disketten können unter MS-DOS und 
DOS-Plus Namen besitzen, die »Vo¬ 
lume« oder »Kennsatz« genannt wer¬ 
den. Das wissen Sie bereits vom 
dritten Teil dieser Serie. Sie wissen 
auch, wie Siebestimmen können, daß 
Disketten einen Namen erhalten. Da¬ 
zu müssen Sie sich schon beim For¬ 
matieren entschließen. Zur Erinne¬ 
rung: 

A>FORMAT B: =V 
Neue Diskette für Laufwerk B: einle- 
gen und ENTER drücken wenn fertig 
Formatierung beendet 

Band Kennzeichen (11 Zeichen, 
ENTER für keines)? MSDOS-SYS 

Am häufigsten wird Ihnen der Name 
einer Diskette beim DIR-Befehl be¬ 
gegnen. Jedesmal, wenn Sie ihn ein¬ 
geben, zeigt MS-DOS beziehungs¬ 
weise DOS-Plus erst einmal den Na¬ 
men der angesprochenen Disektte an. 
Aber Sie können sich den Namen auch 
allein anzeigen lassen. Dazu kennt 
MS-DOS den residenten Befehl VOL. 
Er liest, ohne Parameter aufgerufen, 
den Namen der aktuellen Diskette ein 
und zeigt ihn an: 

A > VOL 

Volume in Laufwerk A ist 46001G 

Sie können aber auch direkt nach dem 
Befehlsnamen ein Laufwerk angeben: 

A > VOL B: 

Volume in Laufwerk B ist 46002G 

Besitzt eine Diskette keinen Volume- 
Namen, erscheint die folgende Sy- 
stemmeldting: 

A>VOL C: 

Volume in Laufwerk C hat keinen 
Namen 

Gefällt Ihnen einmal der Name nicht 
mehr, können Sie ihn jederzeit ändern. 


ZU MS-DOS 


Das setzt aber natürlich voraus, daß 
Sie der Diskette bereits beim Forma¬ 
tieren einen Namen gegeben haben. 
Nachträglich können Sie eine namen¬ 
lose Diskette nicht »taufen«. Zum 
Zwecke der Namensänderung können 
Sie das Dienstprogramm LABEL. 
EXE laden. Es zeigt zuerst den alten 
Namen an und bittet Sie dann, einen 
neuen einzugeben: 

A> LABEL 

Volume in Laufwerk A ist 46001G 
Volume Name (11 Zeichen, ENTER 
= keiner)? SYSTEM 1 

Geben Sie danach erneut VOL oder 
DIR ein, wird der neue Name an¬ 
gezeigt. 

Wenn Sie lediglich die ENTER-Taste 
betätigen, weiß MS-DOS-nicht, ob Sie 
das Programm LABEL.EXE nur ab¬ 
brechen oder den Namen der Disket¬ 
te löschen wollen. Daher stellt 
LABEL.EXE noch eine Frage: 

Aktuellen Volume Namen löschen 
(J/N)? 

Stört Sie diese Fragerei, können Sie 
auch alle Angaben bereits in der Kom¬ 
mandozeile aufführen. Zwei Beispie¬ 
le dafür: 

A> LABEL B.GEM-PAINT 
B> LABEL SYSTEM3 


Komfortabler Diskmanager 

Die Syntax von Programmen wie 
DISKCOPY, DISKCOMP und FOR¬ 
MAT ist ja nicht immer ganz einfach 
zu merken. Wer diese Programme zu 
mühsam findet, kann auf einen kom¬ 
fortablen Diskettenmanager zurück¬ 
greifen. Er heißt bezeichnenderweise 
DISK.CMD und läuft ausschließlich 
unter DOS Plus. 

Was bedeutet nun schon wieder die 
Namenserweiterung ».CMD«? Bisher 
haben wir bereits .COM und .EXE 
kennengelernt. Die neue Extension 
.CMD zeigt an, daß das Programm 
nicht für MS-DOS geschrieben wur¬ 
de, sondern für CP/M-86. Denn DOS 


Plus kann ja bekanntlich nahezu alle 
Programme verarbeiten, die unter 
CP/M-86 entwickelt wurden. 
DISK.CMD ist voll menuegesteuert. 
Im Hauptmenue zeigt das Programm 
folgende Optionen an: 

Diskette kopieren 
Diskette formatieren 
Diskette prüfen 
Zurück in DOS Plus 

Mit den Cursortasten oder durch Be¬ 
wegung der Maus können Sie einen in¬ 
versen Balken über einen der 
Menuepunkte legen und dann die 
ENTER-Taste betätigen. Alternativ 
können Sie sich auch durch Drücken 
der Leertaste zu einem Menuepunkt 
hintasten. 

Wählen Sie nun einmal »Diskette ko¬ 
pieren« an. Das Programm fertigt in 
diesem Fall eine sektorweise Kopie ei¬ 
ner Diskette an und ähnelt damit 
DISKCOPY.EXE. DISK.CMD zeigt 
alle möglichen Kombinationen an: 

Kopieren von: 

A: nach A: 

A: nach B: 

B: nach A: 

B: nach B: 

Zurück ins vorherige Menue. 

Wenn Sie einen der Menuepunkte aus¬ 
wählen, zeigt das Programm die fol¬ 
gende Aufforderung an: 

Legen Sie die Quelldiskette in Lauf¬ 
werk A. Weiter mit beliebiger Taste 

Das Programm analysiert daraufhin 
das Diskettenformat. Neben den be¬ 
kannten MS-DOS-Formaten gibt es ja 
noch zwei CP/M-86-Formate. Doch 
dazu später mehr. Normalerweise 
werden Sie die folgende Meldung 
sehen: 

Quell Disk ist 360K Amstrad PC Disk 
Legen Sie die Zieldiskette in Laufwerk A 

Aber versuchen Sie doch einmal, den 
Diskettenmanager von B: nach A: ko¬ 
pieren zu lassen. Es erscheint dann die 
falsche Meldung: 

Legen Sie die Quelldiskette in Laufwerk C 

Da hat man sich wohl einen deftigen 
Programmierfehler geleistet. Je nach¬ 
dem, ob die RAM-Disk installiert ist 
oder nicht, erscheint eine Meldung, 
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Vokabeltr^iner, ein aus- 

gereifles Übungsprogramm. Er be¬ 
rücksichtigt die wichtigsten pädago¬ 
gischen Grundsätze. Beliebig viele 
Lektionen können gelernt, geübt 
und abgefragt werden. 

C 39,- D 49.» 

Joyce D 59,-- 

Verbentrainer 

Programm zum Üben der unregel¬ 
mäßigen englischen Verben 
C 29,- D 39,-- 

Joyce D 49,- 


Unser neuer Schaltungs- 
Service für 
Schneider Besitzer 

CPC 464-664-6128 je 19.80," 

PCW 8256-8512 je 24.80,-- 

CTM 644 1S - 

CTM 640 - GT64/65 Je 12,- 

PC 1512 29.80,-- 

Monitor CM/MM je 15,-- 
DruckerDMP 2000/3000 je 19.80,- 

Drucker 401 19.80,-- 


Achtung 


Multiface II 



Multiface II - das Kopierprogramm 

Multiface rwo - du bei& hü Sw 3 .imklkncn in 

einem!!!! 

-Vcfbtänriige Kopiere umchlung für K.’.recUen und 
Disketten. 

- Besteht ans 8K-Rxm und 8K-Ram Erweiterung 
und wird lediglich »ul den Kxpenaiaospart Drei 
CPC(464, 664,6128) EufeMteckt 

- Wahjwciscs Kopieren von IC»», auf Disk, und 
umgekehrt, sowc vcm Ka». zu Km. und Di»k 
zu Disk. 

- Kopien jedes im Speicher stehende Programm 
snf K»rette oder Diskette. 

- [.adezcit von 64 K Programmen: Diskette unter 20 
Sekunden / Kaarette unter 1 Minute. 


Einführung 

Adapter 


'Spreis 
ür 6128 


178,- 
29,~ 


Mirage Imager 

Sicheiheitskopie ? - Kein Problem 

Dafür gibt e» jetzt den ‘MIRAGF. IMAGER' ! 

- Extrem einfache Handhabung. Übertragt jedes 
Programm auf Diskette oder Kassel* * durch ein¬ 
fachen Tastendruck. 

- Anwetakrrireuollich durch Menucsteuerung und 
100 % Fchleiabaichsrung. 

- Sehr hohe und leistungsfähige Komprimierung. 
Benötigt somit ein Minimum an Kapazität auf 
Ihrer Kai. oder Disk. 

- Bei Abspekhcrung auf Kassette 2 Geschwindig¬ 
keiten wählbar. 

- Bestellt aus 8K-Ram und 8K-Rom Hardware und 
wird lediglich auf den Expanaicaispnrt Ihres CPC 
(464, 664,6128) aufgesteckl. 

MIRAGE IMAGER wurde in 
England von Fachjournaüsfen 
zum CPC - Zubehör des Jahres 
1986 erklärt!! 


Einführungspreis 178,- 

Adaptcr für 6128 29,-- 


/Elektric Studio- Produkte^ 

Light pen, Freihandzeichnen auf 
Monitor, Abspeichem möglich 

- Hardcopy der Bilder auf Joyce 
Drucker in 3 Größen möglich 

- gängige Funktionen wie Bleistift, 
Sprühdose, Radiergummi, Invers 

Joyce 278,-- 

PC 98,-- 

464,664,6128 98,-- 

Maus hochwertig mit Interface 

- Zeichensoftwareprogramm wie 
beim Light pen (Kunstbereich) 

- Joystickanschluß am Interface 
Info anfordem 

Joyce 448,-- 

Video DigiÜser extrem einfach zu 
bedienen 

Anzuschließen am Erweiterungspor! 
auf der Rückseite des Monitors 
Problemlose Verbindung zum Video 
ausgang der Kamera oder des Re¬ 
korders 

- Notwendige Software wird milge- 
liefen 

464,664,6128 348,-- 

Joyce 348,-- 


Alles für Ihren Schneider PC 


■n r 



B-Laufwerk 360 kb 398.- 
Aufrüstsatz auf 640 kb 78,-- 
Public-Domain Paket 98,-- 
10 Disk, mit Z.B. Text Verarbeitung 
Wordflcx^luginmilatar uj.w. 

(Sic erhalten eine Liste für weitere PD's) 

Lüfterbaustein 98,— 

P 6 NEC 24 Nadeln 1398,- 
Druckerkabel Centr. 38,-- 




Fes tplatlennachiüstungs satz Lapine 

* vollaulnmaliachnr Kopfbcbctncch. 

* probiemlwer Einbau 

* enorm lange Lebenserwartung 

* 65/35 ms Zugriffirit 

* geräuscharm 

* genügter Lcutungsbcdarf (14Watt) 

Lapine 21 MB/65 incl. Contr. 

Lapine 33 MB/35 incl. Contr. 

Lapine 21 MB/65 Drive Card 
Lapine 33 MB/35 Drive Card 

Sic können den PC-ümbau auch in una ere r Scrv 
Werkstatt (Meisterbetricb) vaüziehm lauen! 


PC Software komplette 

A uftragabcarbc i üing 
Adro», Artikel, Faktura 
Pinrnzbuchhal tung 

Vortex Harddisk 
Wordstar 
Junior dBase 
Junior Mulliplan 
Beckerbase PC 


498,— 
498,-- 
1398,-- 
399- 
399,-- 
299,-- 
99,~ 


1295, 

1395, 

1345, 

1495, 


eit* Datenbank, die in ettiiehm 
"Marmjahrcn" Entwicklungszeit 
entstanden ist Wahrlich kein 
einfällsloacr Clone, saeukrm ein 

völlig neuer Entwurf. 

Kau mm glauben-Frei» von DM 99,- 


Bauen Sie Ihren 


Schneider Joyce 

Textverarbeitungsprogramm um zu: 

.einer Buchführungsanlage ...,. einem Burosystem 

Entwicklungsstalion oder wieso schreiben Sie nicht einfach ein .Buch. 

h (3000 Seilen können auf 10 Mbytes gespeichert werden) 



10 Megabyte Hard Disk 1.698,-- 
20 Megabyte Hard Disk 1.998,-- 


Supercopy 

Das Disneitenkopierprogramm der Superlati¬ 
ve lur Schneider CPC 464 664 6126 und 
Joyce 

Mit dem absoluten Servicehammer, der lur 
höchste Qualität spricht Sollte SUPERCOPY 
einmal eiwas nicht schallen 
Senden Sie die Ongmaldisketie Ihres Pro¬ 
gramms und von SUPERCOPY an den Her- 
sieller. dann erhalten Sie kostenlos eine neue 
Version incl der Erkennung des neuen Ko 
pierschuizes 

- Sicherheilskopie anlegen möglich 1 

- Sehr bedienungslreundlich und schnell 

- 100% MC bearbeite! alle 43 Spuren 

- UntersiutZI 2 Laufwerk mil Laulwerks- 
ophonen 

A-A AB. B-B. S A (CPC s) 

- Volle Speicherausnutzung bei Joyce und 
Joyce plus 

- Jede mögliche Seklorgrolie. -anzahl, 
Spumr Koplnr 

- Sekloren mit gelöschter Data ADRESS 
MARK 

SUPERCOPY kopiert 99.9% der aut dem 
Markt belmdlichen Sollware 
(1 1 Sicherheilsduplikal)" 11 Ein unentbehrli¬ 
ches -Disc Tool - lur |eden CPC- und Joyce- 
Besitzer 


3" Diskette lur Joyce 
V.3 Diskette lur CPC s 


80, - DM 
79, - DM / 


Achtung! Wir liefern auch gern in die Schweiz und nach Österreich! 

Zahlung perScheck oder Überweisung (Vorkasse) wegen komplizierter 
Nachnahmeabwicklung erwünscht. Bitte Einzelinfo anfordern! 

Karl-Heinz Potsdamer Ring 10 • 7150 Backnang-g 'S* 0 7191/1528-29 
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Achtung 


Wir verstärken unsere Aktivitäten im 
PC-Bereich und hauen deshalb unser 
Joyce-Lager ab. 

Joyce (Sonderpreis) 1.578,- 

Joyce Plus (Sonderpreis) 2.198,- 
(solange Vorrat reicht !!) 

Volle Garantie und Kundendienst 
(Meisterwerkstadl) 



Amdrum 

- das überragendste Steckmodul, das 
je entwickelt wurde 

- 8 digital aufgenommene realistische 
Drum -Geräusche 

- einfach zu bedienen 

- kreativ, lehrreich und unterhalfsam 

- umfaßt mehr als 1000 program¬ 
mierte Rhythmen 

- Songs können auf Band gespei¬ 
chert werden 

- komplett mit Software und deut¬ 
schem Handbuch 

- für 464,664,6128 138,- DM 

- Adapter für 6128 30,-DM 
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Pascal- erfüll! alle 
Anforderungen von 
Standard-Pascal 

Diskette 2: Assembler-Paket mit 

Z80-Assembler, 
Linker und Disas¬ 
sembler 

Diskette 3: Künstliche Intelligenz - 
Interpreter für LISP 
und Prolog 

Diskette 4: C-Compiler Small-C - 
verarbeitet sogar Fließ¬ 
komm azahlen 

Diskette 5: Forth-83 - sehr voll¬ 
ständige Implementat¬ 
ion der Sprache Förth 
Diskette 6: CP/M-Hilfsprogramme 
wie SQ (komprimiert 
Dateien bis zu 60%), 
Diskettenmonitor 

JRT-Pucal, Smill-C und LISP benötigen auf 
dcinCPC-464^S64 eine SpeicbererweilEiung 
(64K), Prolog hingegen nicht. 

Diskette 3", 5 1/4“ Vortcx mit 
deutschem Handbuch 30,•• 




Aiwa - Datenrecorder 



* auch für MSX - Standard 

* Betrieb mit doppelter Geschw. 

* Datenanzeige per Blink-Led 

* “Save"-Anzeige 

* Monitor zum Mithören 

* Zusatzausgangsbuchse zum Kop. 

* Phasenwahlschalter zum Laden 
für CPC 664/6128 mit Kabel 148,- 

Simline-Musik-Data Recorder 



für CPC 664/6128 mit Kabel 98,-- 


AMX-Mousc 
nie erreicht! 

Sie erleichtert die Benutzung des 
Mikrocomputers und stellt einen 
großen Fortschritt dar. 

- Benutzerfreundliches System 

- Steuerung des Computers über 
Bildschirm 

- Text und Graphik können ver¬ 
mischt werden 

- mit Software ähnlich Macintosh 
und Atari 520ST, Joyce 298,- 

-464.664,6128 248,- 

- Interface+Adapter(Joyce)128,- 

- mit deutschem Handbuch 
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Page Maker • kombinierbar zur 

AMX-Mouse 

- erlaubt Herstellung von Zeitungen, 
Poster und Handzettel 

- professionelle Text- und Graphik¬ 
darstellung 

- benötigt 64k Zusatzspeicher bei 464 
und 664 

- 16 Schrifttypen vorgegeben, Ent¬ 
wicklung eigener Schrifttypen 

- Zeichnen, Sprühen und Malen 

- nur Diskettenversion 

- mit deutschem Handbuch 

- dieses Produkt ist jeden Pfennig 
von 178,- DM wert 


/TJi 


nser Public-Domain- 
Service 

Speziell für Sie!!! 

Ca. 1000 Programme auf 256 Disket¬ 
ten warten auf Ihren Einsatz!! Beste¬ 
hend aus amerikanischen, englischen 
sowie deutschen CP/M Programmen 
für Ihren CPC 464, 644, 6128 und 
Joyce. Unter anderem sind dabei: 

- Pascal Compiler 

- C-Compiler 

- Forth 

- Lisp 

- dBase Programme 

- Tips & Tricks dBase 

- Assembler 

- Disasscmbler 

- Diskettenmonitor 

- Z 80Assembler 

- Massenweise Utilities 

- Texteditor 

Dies ist nur ein kleiner Ausschnitt aus 
unserem reichhaltigen Angebot. Der 
Gesamtprogrammkatalog wird bei 
der Erstbesiellung mitgeliefert! 

Jede Diskette (3", 3,5", 5 1/4") 

20,- DM 


dk'tronics-Produkte für CPC und Joyce 



dk'tronics-Module haben alle 
einen durchgeführten System¬ 
bus und können hintereinander 
auf den Erweiterungsport 
gesteckt werden. Modale mit * 
benötigen einen Adapter für die 
Anpassung Schneider/Amsirad 
S^zu DM 29.- J 


für 464/664: 

Speech Synlh.(Rom) 
Speech Synth. (Kas.) 
Lightpen (Kas.) 

Lightpen (Rom) 

64 k Erweiterung 
256 k Erweiterung 
256 k Silicon Disk 

für 6128: 

256 k Erweiterung * 

256 k Silicon Disk * 
Speed Synth. (Rom) * 
Lightpen (Rom) * 

64 k Silicon Disk Oper. * 
Adapter engl./deutsch 

für PCW 8256, 82512: 


129,- 

89,- 

59,- 

89,- 

129, 

298, 

298, 


298,- 

298- 

139,-- 

89,- 

98,- 

29- 


256 k Erweiterung auf 512 kRam * 148,- 
Joystick-Controller (Interface) * 98,— 

Joystick-Coniroller+Musik/Sound* 158,- 
Echtzeituhrcnmodul * 138,— 

Adapter engl./deutsch 29,- 

TV -Tuner für Colormonitor CTM 640, CTM 644 248 



Alles für 

den Joyce 


Farbband Drucker 

29.90,- 

RAM-Erweiterung 256 k 

149,- 

1 MB-Laufwerk FD 2 

598,- 

Bilds chiimfilter 

89,- 

Parallel -Scriellschniustelle 148,- 

C-Basic-Compiler 

169,- 

SmalC 

99,- 

Locoscript (Kurzanlcitung)29.50 

Prompt (DateiVerwaltung) 69,- 

Prompt-Druck 

39,-- 

Mica (CAD) 

198,- 

RH-Dat 

89,- 

Turbo Adrcss Joyce 

169,- 

Dr. Draw 

199,- 

Dr. Graph 

199,- 

Vereinsverwaltung 

199,- 

dBase!!, Wordstar 

Je 199,- 

Multiplan 

199,- 

Profirem (Adrcss, Artikel) 178,- 

Fibuking 

136,- 

Pak tu rem 

98,- 

Lagerdatei 

68,- 

Adressdatei 

58,- 

Headline 

198,- 

Turbo-Pascal 

225,- 

Faktum 10 

148,- J 


»Unsere Special Ativenture- 
Der Diamant von Rabenfels 
Reise durch die Zelt 
Sherlock Holmes 
Auftrag In der Bronx 
Drachenland 
Die Insel der Smaragde 
Das Pharaonengrab 
Ruan 
ie Adventive 

C 29,- D 39,- 

f Wichtiges Zubehör 

Netzteil MP 1 148,- 

Netzteil MP 2 168,- 

RS 232 (V 24) m.Software 168,— 
Rollenhaller NLQ 401 29.80,- 

Papierrolle je 12.80,— 

Druckerkabel 464,664,6128 48,— 

Veriängcrung Mon-Konsolc 24.80,— 
Verlängerung dito 664,6128 29.80,- 
Druckerständer 48,- 

Monitordreh Ständer 48,- 

Farbband Okimate 20 Bl/Col. 19.80,— 
Farbband NLQ 401 14.80,- 

Faibband DMP 200/300 19.80,- 

Faibband Star SG 10 9.80,- 

Farbband NL 10 29.80,— 

Farbband Panasonic 1090/92 29-80,- 
Disketten 5,25" SS/DS 29,- 39.- 

Disketten 3,5" 1DD/2DD 49 - 59- 
Disketten 3" CF 1D/1DD 98,- 179,- 
Diskettenbox 3"/3,5" 40 39.80,- 

Diskettenbox 3”/3,5" 80 49.80,- 

Joystick Schneider 39.80,— 

Joystick Compet. Pro 5000 49,- 

TrakiorNIX) 401 79.50- 

Endlospanier 1000 Bl. 29.80,— 
Abdeckhauben 
Konsole 464,664,6128 19.80,- 

NLQ DMP 2000 19.80.- 

Floppy DD1, FD 1, Vortex 16 8 °" 

Morutor grün / color 29.80.- 

Einzelblattführung Joyce 37,— 

Typenraddrucker SD 15 698,— 

Vortex 

Fl-X/Ml-X 758,- 

Fl-X /Ml-X (RSC) 858,- 

Fl-S/Fl-D 998,- 1498- 

Joyce Programme 

Business Star 298,- 

Fibu Sur 298,- 

Star Mail 98.- 

StarBase 198,- 

Mailingsystem 189,~ 

Datei Star 98,- 

Statistikstar 98,- 

Endlosetlketten 3 H , 3,5" 

V^Pack 200 Stk (70x70) 16.^ 










q Hiermit bestelle ich per Nachnahme 
(Vcrsandkoslenpauschale 6.80 DM) 
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daß das Laufwerk nicht vorhanden ist, 
oder daß die Diskette ein unbekann¬ 
tes Format besitzt und deswegen nicht 
kopiert werden kann. 

Die Kopierroutine von DISK.CMD 
erkennt automatisch das verwendete 
Diskettenformat. Sie können deshalb 
völlig ohne Nachdenken eine beliebi¬ 
ge MS-DOS-, DOS-Plus oder 
CP/M-86-Diskctte einlegen. Sie wird 
korrekt kopiert. 

Unter »Diskette prüfen« muß man sich 
etwas anderes vorstellen als unter dem 
MS-DOS-Dienstprogramm DISK- 
COMP.EXE. Denn hier werden nicht 
zwei Disketten verglichen. Vielmehr 
versucht DISK.CMD lediglich, alle 
Sektoren zu lesen. Gelingt das ohne 
Schwierigkeiten, kann die untersuch¬ 
te Diskette als unbeschädigt gelten. 
Der Menuepunkt »Formatieren« 
spricht wohl für sich. Sie sollten wie¬ 
der aus wählen, auf welchem Laufwerk 
sich die zu formatierende Diskette be¬ 
findet. Danach wird es etwas unüber¬ 
sichtlich. Denn das Programm listet 
das folgende Menue auf: 

360K Amstrad PC Disk 

320K DOS Disk 

180K DOS Disk 

160K DOS Disk 

320K CP/M Disk 

160K CP/M Disk 

Zurück ins vorherige Menue 

Die erste Formatbezeichnung stellt das 
ganz normale PC-Format dar. Warum 
sie ausdrücklich als »Amstrad PC« be¬ 
nannt wird, ist unklar. 

320 KByte erhalten Sie, wenn Sie ei¬ 
ne Diskette im 8-Sektor-Format initia¬ 
lisieren. 

180K entsprechen einer einseitig for¬ 
matierten Diskette. 

160K stehen für acht Sektoren pro 
Spur und gleichzeitig einseitige For¬ 
matierung. 

Ähnlich sind die letzten beiden Anga¬ 
ben zu verstehen. Auch CP/M-86, 
dessen Disketten DOS Plus lesen 
kann, verarbeitet ein- und zweiseiti¬ 
ge Disketten. Da grundsätzlich nur 
acht Sektoren formatiert werden, 
kommt man nicht in den Genuß der er¬ 
höhten Kapazität von 360 KByte. 
CP/M-Disketten sollten Sie nur im Be¬ 
darfsfall verwenden. Denn Sie können 


diese nur mit DOS Plus und eben 
CP/M-86 verarbeiten, während DOS- 
Disketten unter allen beim PC-1512 
mitgelieferten Betriebssystemen arbei¬ 
ten. Das sind bekanntlich MS-DOS 
3.2, DOS-Plus und GEM-Desktop. 
Nach einer Sicherheitsabfrage wird die 
eingelegte Diskette formatiert. Handelt 
es sich um ein DOS-Medium, fragt 
DISK.CMD: 

Soll von dieser Disk gebootet werden 
können (J/N)? 

Beantworten Sie diese Frage mit »J«. 
überträgt DOS Plus die Systemspuren 
auf die frisch formatierte Diskette. Da¬ 
zu müssen Sie aber eine lauffähige Sy¬ 
stemdiskette einlegen. Allerdings 
akzeptiert DISK.CMD nicht die Sy¬ 
stemdiskette von MS-DOS 3.2: 

Dies ist nicht die richtige Diskette. 
Nochmals versuchen oder mit ESC ab¬ 
brechen. 

Das bedeutet, daß Sie mit DISK.CMD 
nur DOS Plus-Systemdisketten erzeu¬ 
gen können. Dies ist an sich sehr be¬ 
dauerlich. Sie werden aber ohnehin 
nur auf sehr wenigen Disketten die 
Bootspuren aufkopieren, um von die¬ 
sen das System starten zu können. 
Denn im Gegensatz zu CP/M 2.2 ver¬ 
langt MS-DOS genausowenig wie 
DOS Plus ständig nach einer System¬ 
diskette im Laufwerk A:. 

Bei CP/M-86-Disketten macht es na¬ 
türlich sehr wenig Sinn, DOS- 
kompatible Bootspuren zu speichern. 
Stattdessen erscheint die Frage, ob 
Paßwortschutz und Zeitstempelung ak¬ 
tiviert werden sollen: 

Möchten Sie Zeitstempel und Pass¬ 
wortschutz für die Dateien auf dieser 
Diskette? (J/N) 

Sie können beides ruhig aktivieren, 
müssen dann aber folgende Einschrän¬ 
kungen hinnehmen: Erstens belegen 
sie Platz im Inhaltsverzeichnis der Dis¬ 
kette, so daß weniger Dateien gespei¬ 
chert werden können. Und außerdem 
lassen sich derartige Disketten nur mit 
Einschränkungen unter cfVM 2.2 le¬ 
sen. Denn ein 5,25-Zoll-Zweitlauf¬ 
werk ohne eigenen Controller ist am 
Schneider-CPC durchaus in der Lage, 
CP/M-86-Disketten zu verarbeiten. 
Nur geht das mit Paßwortschutz so¬ 


wie Datums- und Zeitstempelung nur 
mit Schwierigkeiten. Denn CP/M 2.2 
interpretiert dann manche Daten auf 
der Diskette falsch. 

DOS Plus ist aber so intelligent, die¬ 
se Einträge auszuwerten. Das bringt 
dann beim Handling von CP/M- 
Disketten den von DOS gewohnten 
Komfort. Außerdem erhält die CP/M- 
Diskette dann einen Namen, der von 
DISK.CMD automatisch auf »DOSP¬ 
LUS IBM« festgelegt wird. 

Es gibt aber einen ganz offiziellen 
Weg, der Diskette nachträglich einen 
anderen Namen zu verpassen. Ähnlich 
dem Dienstprogramm LABEL.EXE 
für MS-DOS existiert für CP/M-86 
das Allzweckprogramm FSET.CMD. 
das eine Menge Gemeinsamkeiten mit 
SET.COM unter CP/M Plus besitzt. 
In einer späteren Folge dieser Serie 
werden wir noch detaillierter auf 
FSET.CMD eingehen. Im Augenblick 
deshalb nur der Hinweis, wie man 
Disketten mit FSET.CMD um¬ 
benennt: 

A>FSET B:[NAME = CPM86] 

Statt der auf der deutschen Tastatur 
üblichen Umlaute müssen Sie hier un¬ 
bedingt eckige Klammern einsetzen. 
Da die Tastatur aber entsprechend auf 
deutsche Verhältnisse umbelegt ist, 
gehl das nicht ganz problemlos. Es 
gibt aber zwei Wege. 

Der eine besteht darin, die ALT-Taste 
zu drücken und dann über die Zehner¬ 
tastatur den ASCII-Code des ge¬ 
wünschten Zeichens einzugeben. Für 
die öffnende eckige Klammer ist das 
ALT-91, für die schließende ALT-93. 
Das Zeichen erscheint, sobald Sie die 
ALT-Taste wieder loslassen. 

Der zweite Weg ist es, zwischenzeit¬ 
lich auf die amerikanische Originalta¬ 
statur umzuschalten. Dazu drücken Sie 
gleichzeitig die Tasten ALT und 
CTRL, halten diese gedrückt und be¬ 
tätigen dann die Funktionstaste Fl in 
der linken oberen Ecke der Tastatur. 
In der Statuszeile ändert sich bei DOS 
Plus sofort die Angabe »D8« in »US8«, 
und Sie können die eckigen Klammern 
eingeben. Da aber die Beschriftung 
der Tasten absolut nicht mehr zu den 
Bildschirmzeichen paßt, müssen Sie 
ein wenig auf Suche gehen. Zumindest 
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die beiden eckigen Klammern und der 
umgekehrte Schrägstrich sind aber net¬ 
terweise auf den entsprechenden Ta¬ 
stenkappen aufgezeichnet. 

Mit CTRL-ALT-F2 erhalten Sie wie¬ 
der die gewohnte deutsche Tastatur¬ 
belegung. Dieser Umschalttrick 
funktioniert genauso unter MS-DOS, 
nur die praktische Statuszcile fehlt. 

Weitere Umschaltkombinationen 
kennt DOS-Plus wie folgt: 
CTRL-ALT-F3: 

US-Zeichensatz (7 Bit) 

CTRL-ALT-F4: 

Deutscher Zeichensatz (7 Bit) 

CTRL-ALT-F5: 

Spezialzeichensatz 

CTRL-ALT-F5 ist ungemein prak¬ 
tisch, wenn Sie Programme in Spra¬ 
chen wie C oder Pascal schreiben. 
Denn damit erhalten Sie die deutsche 
Tastaturbelegung mit den amerikani¬ 
schen Originalzeichen. Das ist genau¬ 
so, wie wenn Sie auf einem Schnei- 
der-CPC mit SYMBOL deutsche Zei¬ 


chen definieren, aber ansonsten die 
Tastatur nicht umbelegen. Nur eben 
mit dem Unterschied, daß die Tasta¬ 
tur bereits auf DIN-Belegung einge¬ 
stellt ist. Aber wenn Sie einmal mit 
CTRL-ALT-F5 gearbeitet haben, wer¬ 
den Sie diese Tastaturbelegung für vie¬ 
le Zwecke bevorzugen. 

Ein Fehler in DOS Plus am Rande: 
Wenn Sie in A: eine MS-DOS- oder 
DOS Plus-Diskette eingelegt haben 
und in B: eine CP/M-Diskette, kann 
es von Zeit zu Zeit passieren, daß 
DOS Plus versucht, auf B: zu lesen, 
obwohl eigentlich A: angesprochen 
wurde. An solchen Beispielen zeigt 
sich, daß es eben doch nicht ganz so 
einfach ist, zwei Betriebssysteme 
gleichzeitig zu emulieren. 


COPY erweitert 


Sie kennen bereits das MS-DOS- 
Kommando COPY, das Dateien ko¬ 
pieren kann. Es ist aber erheblich lei¬ 
stungsfähiger, als es auf den ersten 
Blick scheint. Denn es kann nicht nur 


Diskettendateien kopieren, sondern 
auch mit den anderen an Ihren PC an¬ 
schließbaren Geräten arbeiten. 

Wollen Sie eine Datei von einem Dis¬ 
kettenlaufwerk auf ein anderes kopie¬ 
ren, verwenden Sie den folgenden 
Aufruf des residenten Befehls COPY: 

A > COPY A:QUELLE B:ZIEL 

Aber auch mehrdeutige Dateinamen 
sind zulässig. Sie kennen diese bereits 
von DIR, ERASE und RENAME: 

A>COPY A:*.* B:*.* 

A>COPY B:*.EXE C:*.EXE 

Eine praktische Kurzform sieht so aus: 

A>COPY *.* B: 

A>COPY B:*.EXE C: 

Denn hier erhalten die Dateien auf 
dem Ziellaufwerk ja denselben Namen 
wie auf dem Laufwerk, von dem sie 
gelesen wurden. Aber COPY kann 
beim Kopieren auch gleich die Datei 
umbenennen: 
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A>COPY AiDISKCOPY.EXE 
B:DCOPY.EXE 

Auffällig ist hier nur, daß bei MS- 
DOS und DOS Plus genau die umge¬ 
kehrte Reihenfolge verwendet wird 
wie die, die man von PIP.COM aus 
CP/M 2.2 und CP/M Plus gewohnt 
ist. Dort heißt es ja: 

A>PIP B: =*.* 

A > PIP C:=B:*.COM 
A> P1P B: DISCKIT.COM = 
D1SCKIT3.COM 

COPY kann aber auch — genauso wie 
PIP.COM — mehrere Dateien zu ei¬ 
ner großen Datei verbinden. Dazu ge¬ 
ben Sie alle Dateinamen mit 
Pluszeichen in der gewünschten Rei¬ 
henfolge an: 

A >COPY DATEI 1+DATEI2 
B:GESAMT 

Fehlt der Name der Zieldatei, löscht 
COPY die erste Datei und speichert 
die Gesamtdatei unter deren Namen: 

A>COPY DATEI+ DATEI2 

Dabei müssen aber alle Namen unter¬ 
schiedlich sein. Sonst erscheint eine 
Fehlermeldung: 

A >COPY A + A 

A 

A 

Inhalt des Zieles verloren vor Kopieren 
Inhalt des Zieles verloren vor Kopieren 
1 Datei(en) kopiert 

Beim Verbinden mehrerer Dateien hat 
aber MS-DOS ein Problem, das aus 
seiner CP/M-Abstammung herrührt. 
Denn CP/M kann nicht exakt die Län¬ 
ge einer Datei bestimmen. Im Inhalts¬ 
verzeichnis einer Diskette wird diese 
Angabe nur auf 128 Bytes genau ver¬ 
merkt. Es wäre aber für ein Textver¬ 
arbeitungsprogramm unmöglich, 
wenn am Ende einer Datei bis zu 128 
»Schmierzeichen« stehen. Deshalb en¬ 
den Textdateien beim ersten Auftre¬ 
ten des Zeichen CONTROL-Z 
(ASCII-Code 26). 

Binäre Dateien können aber sehr wohl 
ein CONTROL-Z enthalten, das kei¬ 
neswegs als Kenner für das Dateien¬ 
de betrachtet wird. Es kann ein 
Maschinenbefehl oder ein beliebiges 
Datum sein. 


Da viele MS-DOS-Programme nur 
Übersetzungen von CP/M-Rennern 
sind, schreiben sie in gewohnter Ma¬ 
nier CONTROL-Z an das Ende einer 
Datei, obwohl MS-DOS die Dateilän¬ 
ge bis aufs Byte genau feststellen kann. 

Damit beim Verbinden mehrerer Da¬ 
teien durch COPY nicht entweder In¬ 
formationen verlorengehen oder zu 
viele Bytes übertragen werden, kann 
man festlegen, welches Kennzeichen 
COPY zur Bestimmung des Dateien¬ 
des benutzt. 

Bei Verbindung mehrerer ASCII- 
Textdateien geben Sie die Option /A 
an. COPY kopiert dann bis zum Auf¬ 
treten des ersten CONTROL-Z. Die 
Option darf sowohl direkt hinter CO¬ 
PY stehen als auch hinter einzelnen 
Dateinamen: 

A > COPY /A X + Y GESAMT 
A > COPY X/A + Y/A GESAMT 

Binärdateien werden mit der Option /B 
gekennzeichnet. Das ist die Standard¬ 
auswahl. Dateien werden in diesem 
Fall von COPY ohne Beachtung even¬ 
tueller CONTROL-Z-Zeichen Byte 
für Byte übertragen: 

A>COPY /B BINI+BIN2 
GESAMT 

A >COPY BIN1/B + BIN2/B 
C: GESAMT 

Aber die beiden Optionen können auch 
für die Zieldatei angegeben werden. 
Dann erfüllen sie einen ähnlichen 
Zweck. /A bedeutet, daß an das Ende 
der Zieldatei automatisch CONTROL- 
Z angehängt wird. /B sagt dem Befehl 
COPY, daß kein CONTROL-Z ange¬ 
fügt werden soll. 

Befürchten Sie, daß die Diskette, auf 
die kopiert werden soll, eventuell nicht 
mehr ganz einwandfrei ist, können Sie 
COPY an weisen, automatisch die 
Zieldatei auf Korrektheit zu prüfen. 
Dazu dient die Option /V. Dieser 
Buchstabe steht für »Verify«: 

A>COPY QUELLE ZIEL/V 

Im allgemeinen benötigen Sie diese 
Prüfung aber nicht. Sie kostet beson¬ 
ders bei Diskettendateien viel Zeit. 
Wenn Sie aber zu den vorsichtigen 


Naturen gehören, können Sie auch für 
alle anderen DOS-Diskettenoperatio- 
nen die Überprüfung einschalten: 

A> VERIFY ON 
VERIFY ist on 

Das Ausschalten geht genauso: 

A> VERIFY OFF 
VERIFY ist off 

Rufen Sie VERIFY ohne Parameter 
auf, wird der aktuelle Status angezeigt: 

A > VERIFY 
VERIFY ist off 

DOS Plus ignoriert diesen Befehl: 

A > VERIFY ON 
VERIFY ist aus 

Dafür kann aber DOS Plus mit CO¬ 
PY auch Systemdateien übertragen. 
Nur müßte man dazu erst einmal wis¬ 
sen, welche Systemdateien auf einer 
Diskette gespeichert sind. Kein Pro¬ 
blem, eine selten genutzte Option von 
DIR sorgt bei DOS Plus für den 
Überblick: 

A>DIR/S 

Volume in Laufwerk A ist 46004G 
Verzeichnis von A: \ 

DOSPLUS SYS 75904 22.08.86 13:55 

1 Dalei(en) 2048 Bytes frei 

Verzeichnis Dateien vorhanden 

Wollte man DOSPLUS.SYS mit CO¬ 
PY kopieren, würden sich sowohl MS- 
DOS als auch DOS Plus taub stellen: 

A>COPY DOSPLUS.SYS B: 

Datei nicht gefunden 

DOS Plus kennt aber auch bei COPY 
die Option /S, die hier Systemdateien 
überträgt: 

A > COPY DOSPLUS.SYS=S B: 
l File(s) copied 

In der nächsten Folge dieser MS-DOS- 
Serie lernen Sie weitere Fähigkeiten 
von COPY kennen. Unverbesserliche 
8-Bit-Fans erfahren außerdem, wie sie 
auch auf dem PC-1512 mit PIP arbei¬ 
ten können. 

(M. Kotulla) 
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Die Datenbank 
BECKERBase PC 

Das neueste Produkt aus dem Hause Da¬ 
ta Becker ist das Datenbanksystem 
BECKERBase PC, ein Datenbanksy¬ 
stem mit integrierter Datenbank- 
Programmiersprache für IBM PC und 
Kompatible. Das Programm versteht 
sich als Werkzeug zur Erstellung von 
Datenbank-Anwendungen für kleine und 
mittlere Betriebe. Für einen Einfüh¬ 
rungspreis von 99,- DM (Ab 1.4.87 
299,— DM) erhält man ein sehr um¬ 
fangreiches Handbuch und zwei Disket¬ 
ten mit dem eigentlichen Programm und 
einigen Beispielen. 


Das Programm 


Der erste Schritt ist die Installation des 
Programmes auf die benutzte Hardwa¬ 
re. Dies ist aufgrund der ausführlichen 
Beschreibung im Handbuch und klaren 
Anweisungen auf dem Bildschirm pro¬ 
blemlos. Danach kann das Programm 
gestartet werden und man kann eine der 
beiden fertigen Anwendungen (Adreß- 
und Literaturverwaltung) benutzen oder 
eigene Anwendungen mit der integrier¬ 
ten Programmiersprache erstellen. 

Das Programm wird über Pulldown- 
Menues gesteuert und bietet viele Funk¬ 
tionen zum Bearbeiten von Datenbank- 
Dateien wie Lesen, Einfügen, Drucken, 
Import, Export, Ändern, Löschen, Su¬ 
chen mit Filterbedingungen (wie z.B. al¬ 
le Müller mit einer Postleitzahl über 
2000) und vieles mehr. 

Die eigentliche Stärke des Programmes 
liegt aber in der Möglichkeit, eigene 
Datenbank-Anwendungen mit der Pro¬ 


grammiersprache zu erstellen. 
BECKERBase beinhaltet zu diesem 
Zweck einen Editor, der alle Funktio¬ 
nen eines Textverarbeitungs-Program- 
mes enthält wie Blockbefehle zum Ver¬ 
schieben, Kopieren und Löschen eines 
Programmblocks, Einfügen usw. 

Die Struktur der Datenbank wird mit der 
Compilersprache DDL (Data Definition 
Language) erstellt. Diese Sprache be¬ 
steht aus 11 Befehlen und ist schnell zu 
erlernen. Es werden die Dateien und die 
Eigenschaften der Felder wie z.B. Va¬ 
riablenart, Grenzwerte und die Verbin¬ 
dung der einzelnen Dateien in der 
Datenbank festgelegt. Die eigentliche 
Anwendung wird mit der Interpreter¬ 
sprache TDL (Transaction Definition 
Language) formuliert. Dieses Anwen¬ 
derprogramm wird benötigt, um die Da¬ 
ten in die mit DDL erstellte Datenbank 
zu schreiben, zu lesen und mehrere Da¬ 
teien miteinander zu verknüpfen. So ist 
es problemlos möglich, aus den Datei¬ 
en Kunde, Artikel, Lieferschein eine 
Rechnung zu erstellen, wenn die Zugrif¬ 
fe auf die einzelnen Dateien im Anwen¬ 
derprogramm beschrieben wurden. Die 
TDL-Sprache besteht aus vielen lei¬ 
stungsfähigen Befehlen, die auch Win¬ 
dow-Befehle beinhaltet. So ist es ein 
Leichtes, das Anwenderprogramm me- 
nuegesteuert und mit einer Ausgabe der 
Daten in Windows zu erstellen. Der Zu¬ 
griff auf die einmal erstellte Datenbank 
ist auch später noch zu erweitern, um 
zusätzliche Routinen für die Auswertung 
zu erstellen. Die Demo-Programme auf 
der zweiten zum Lieferumfang gehören¬ 
den Diskette befinden sich einige De¬ 
moprogramme, die die Anwendung der 
TDL-Befehle in der Praxis erklären und 
sind als Ergänzung zum Handbuch 
gedacht. 


Außerdem werden zwei fertige Anwen¬ 
dungsprogramme auf der Diskette mit¬ 
geliefert. Eine Adreßverwaltung zum 
Erfassen und Bearbeiten von Adreßda- 
teien. Mit dieser Anwendung kann man 
sich eine Adressenliste oder Anschrift¬ 
etiketten ausdrucken lassen. 

Weiterhin ist noch eine Literaturverwal¬ 
tung vorhanden, mit der man seine Bü¬ 
cher und Zeitschriften archivieren kann. 
Beide Programme eignen sich sehr gut, 
um den Umgang mit einer fertigen Da¬ 
tenbank zu erlernen. 


Das Handbuch 


Das ausführliche Handbuch trägt sehr 
zum guten Eindruck des gesamten Sy¬ 
stems bei, auf 250 Seiten wird der Um¬ 
gang mit BECKERBase erläutert und 
mit vielen Beispielen garniert. Einzig 
der TDL-Teil ist etwas zu kurz gekom¬ 
men, es werden alle TDL-Befehle in al¬ 
phabetischer Reihenfolge erklärt und 
nicht anhand einer Beispiel-Anwendung. 
So ist man gezwungen, erst den ganzen 
TDL-Befehlssatz zu erlernen und kann 
nicht, wie in BASIC, schon mit einigen 
Befehlen sein erstes Programm er¬ 
stellen. 

Fazit: 

Ein sehr leistungsfähiges Datenbanksy¬ 
stem, wenn man bereit ist, die Zeit zum 
Erlernen der Programmiersprache zu 
opfern. Dann ist man in der Lage, sich 
maßgeschneiderte Anwendungen zu er¬ 
stellen. die Standardanwendungen über¬ 
legen sind. Zum Preis von 99,— DM 
unbedingt zu empfehlen. 

Wie wir auf der CeBit erfahren konn¬ 
ten, wird der Preis von DM 99, - wahr¬ 
scheinlich beibehalten. 


PC Schneider International 

sucht noch freie Mitarbeiterfür folgende Themen: 

• GEM: Realisierung eigener Anwendungen, Tips & Tricks etc. 

• 8086/8088-Assembler: Einführung, Programme, Tips & Tricks etc. 

• PC-Programme: Übersichten, Tests, Erfahrungen 

• Hardware: Erweiterungen, Tests, Tips und Selbstbau-Möglichkeiten 


Interessiert? 

Dann melden Sie sich schriftlich oder telefonisch beim DMV-Verlag, 
Herrn Ritter ■ Postfach 250 • 3440 Eschwege • Telefon (0 56 51) 87 02 


4’87 PC 77 













[—Professional Computing 


Zeitzeichen 

Software-Uhr unter Mallard-BASIC 

Wer sich schon auf den Systemdisketten umgeschaut hat, 
weiß es bereits: Auch der Joyce verfügt, wie jeder vernünf¬ 
tige PC, über eine innere Uhr und sogar einen Kalender. Auf 
Betriebssystemebene kann man zwar mit dem Programm 
DATE die Uhr stellen oder abfragen, der BASIC-Program- 
mierer hat davon allerdings nicht viel. Mallard-BASIC stellt 
keine entsprechende Funktion zur Verfügung (z.B. TIMES), 
und wer möchte schon jedesmal mit SYSTEM aussteigen, 
nur um die genaue Zeit zu erfahren? Doch auch in diesem Fall 
gibt cs Rat. Der folgende Beitrag schlägt zwei Fliegen mit ei¬ 
ner Klappe: Er zeigt, wie die Uhr unter BASIC erreicht wer¬ 
den kann und bietet gleichzeitig ein Anwendungsbeispicl für 
den in der letzten Ausgabe von PC International abgedruckten 
Joyce-Assembler. 

Beginnen wir auf Maschinenebene: Hier begegnet uns zu¬ 
nächst einer der geheimnisvollen Kürzel, mit denen die 
Schneider-Computer reichlich gesegnet sind. SCB steht für 
den sogenannten System-Control-Block, einen 100 Bytes um¬ 
fassenden Speicherbereich, in dem das Betriebssystem Flags 
und Daten aufbewahrt. Das sind u.a. verschiedene Grundein- 
stellungen (Konsolenhöhe und -breite in Zeilen und Spalten, 
die aktuelle Disc-Usernummer usw.) und natürlich auch die 
Uhrzeit. Sie wird ständig per Interrupt auf dem Laufenden 
gehalten und wartet eigentlich nur darauf, daß sie jemand ab¬ 
fragt. 

Um nun an diesen SCB heranzukommen, dient ein CP/M 
3.0-spezifischer BDOS-CALL mit der Funktionsnummer 49. 
Hier die Einzelheiten: 

Registerbelegung beim Einsprung: 

C = 49 

DE = Adresse Parameterblock 
Registerbelegung beim Aussprung: 

A = 1-Byte-Wert aus dem SCB 
HL = 2-Byte-Wert aus dem SCB 

Der Parameterblock ist ein vier Bytes umfassender Daten¬ 
bereich, den wir selbst anlegen müssen, um dem Betriebs¬ 
system mitzuteilen, was wir eigentlich wollen. Er ist wie folgt 
aufgebaut: 

1. Byte: Offset innerhalb des SCB, selektiert den ge¬ 

wünschten Wert. 

2. Byte: # FF für 1-Byte-Wert in den SCB schreiben, 

# FE für 2-Byte-Wert in den SCB schreiben, 
#00 für Wert aus dem SCB lesen. 

3. /4. Byte: Wert, der in den SCB geschrieben werden soll. 
Die Uhrzeit findet man an folgender Stelle: 

Offset = #5A: Stunden 
Offset = #5B: Minuten 
Offset = #5C: Sekunden 

Die Werte werden in BCD-Form verwaltet (»Binär codierte 
Dezimalzahlen«), wobei die rechten vier Bits die Einerzif¬ 
fer und die linken vier Bits die Zehnerziffer darstellen. 
Wie die Uhr nun in der Praxis angesprochen wird, geht aus 
dem Quellcode-Listing hervor, das in der vorliegenden Form 
direkt mit dem BASIC-Editor eingegeben und bearbeitet wer¬ 
den kann. Bitte denken Sie nur daran, daß es für den Joyce- 


Assembler als ASCH-File (SAVE “Name“,A) vorliegen muß. 
Die Kommentare dürften ausreichend klarstellen, wie das 
Maschinenprogramm funktioniert. Ergänzend wäre hier noch 
zu bemerken, daß das aufrufende BASIC-Programm die 
Adressen dreier Integer-Variablen übergibt (in HL, DE und 
BC). Wie das mit Hilfe des CALL-Befehls bewerkstelligt 
wird, können Sie Ihrem BASIC-Handbuch entnehmen. Na¬ 
türlich müssen die in den Variablen übergebenen binären 
Werte beim Stellen der Uhr in den BCD-Code umgewandelt 
werden (und entsprechend umgekehrt bei der Abfrage), so 
daß das Maschinenprogramm noch einiges mehr zu tun hat, 
als nur die BDOS-Funktion 49 aufzurufen. 

Wer mit Maschinensprache nichts am Hut haben will, kann 
auch gleich den mit Hilfe des Joyce-Assemblers erstellten 
BASIC-Lader (siehe Listing) benutzen. Der kurze Demo-Teil 
zeigt, wie die Uhr angesprochen bzw. in eigene Programme 
eingebaut wird. Achten Sie sorgfältig darauf, daß die zur 
Kontaktaufnahme mit dem Maschinenprogramm benutzten 
Variablen immer vom Typ Integer sind! Die Arbeit mit dem 
Quellcode bzw. dem Assembler hat natürlich den Vorteil, daß 
man die Übergabe nach seinen Vorstellungen modifizieren 
und das Programm in einen anderen Speicherbereich legen 
kann. Wie wäre es zum Beispiel mit einer flotten GSX- 
Analoguhr? Und wer sich noch für das Datum interessiert: 
Diese Information ist als 2-Byte-Binärwert unter dem Off¬ 
set #58 zu finden und gibt die Anzahl der Tage seit dem 
1. Januar 1978 an. Für eine mit der Uhr gekoppelten Datum¬ 
sanzeige ist also noch etwas Rechnerei nötig (Schaltjahre 
nicht vergessen!). (M. Uphoff) 


LISTING >UHRDBM0 <, RBMARK = >REX<. 


<88> 

10 

***** Joyce Software-Uhr ***** 


<32> 

20 

***** <c> 1986 M. Uphoff ***** 


< 3> 

30 




<86> 

40 

***** Baslclader 


< 5> 

50 




<69> 

60 MEMORY AHF4FF 


<42> 

70 FOR adr=ÄHF500 TO &HF568 


<41> 

80 READ aS;v=VAL("&H"+aS) 


<67> 

90 s=s+v:PQKE adr,v 


<34> 

100 

HEXT 



<23> 

110 

IF s<>12887 THEN PRINT"Datafehler 

!!!":END 

<22 > 

120 

' 



<84> 

130 

DATA 

C5, IS,E5,DD,21,65,F5,DD 


<94> 

140 

DATA 

36, 00,59,DD,36,01,00,CD 


<97> 

150 

DATA 

1F,F5,El,77,CD,1F,F5,El 


<95> 

160 

DATA 

77, CD, 1F, F5, El, 77, C9, CD 


<31> 

170 

DATA 

5A, F5,47, E6,0F, 4F, A8, 0F 


<58> 

180 

DATA 

47,0F, 0F, 80,81,C9,C5,D5 


<71> 

190 

DATA 

DD,21,65,F5,DD,36,00,59 


<43> 

200 

DATA 

DD,36,01,FF,7B,CD,47,F5 


<30> 

210 

DATA 

El,7E,CD,47,F5,El,7E,0E 


<©Q> 

220 

DATA 

FF,0C,D6,0A,30,FB,C6,0A 


<27> 

230 

DATA 

47,79, 07, 07, 07,07, B0, DD 


<13> 

240 

DATA 

77,02,DD,34,00,OE,31,11 


<78> 

250 

DATA 

65,F5,C3,05,00,5C,00,67 


<64> 

260 

DATA 

24 


<33> 

270 

' 



<23> 

280 


• Uhr-Demo 


<37> 

290 

' 



<28> 

300 

time= 

&HF500:settime=4HF52E 


<23> 

310 

INPUT"Bitte die Uhrzeit eingeben 

(Stunden, Kinu 


ten 

Sekunden): ", st%, mn%,sk% 


<40> 

320 

CALL 

settine(st%,mnü,skU) 


<28> 

330 

PRINT:PRINT'Eine beliebige Taste 

drücken!" 

<64> 

340 

VHILE IMKEYS="":VEND 


<65> 

350 

CALL 

time(stÄ,nn%,skÄ) 


<86> 

360 

PRINT USING st%;mnX;sk% 


<?2> 

370 GOTO 340 
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VERSAND 


Telefonische 
4 Bestellung 

07131/52065 


JOYCE-HARDWARE 


RAM-Erweiterung für Joyce PCW 8256: 
Speichererweiterung von 256 KB Mit ausführlicher Ein¬ 
bauanleitung Preis: 109,— DM 

FD-2 (2. Laufwerk für Joyce PCW 8256): 

Kapazität 2 x 80 Spuren mit insgesamt 1 MB unformatiert. 
Komplet! mit ausführlicher Einbauanleitung in transport- 
sicherer Styropor-Verpackung Preis: 579,— DM 

Schnittsteilen-Interface; 

Mit diesem Interface haben Sie endlich eine 8-Sit-Centro- 
nics- und eine serielle RS-232-Schnittstelle an Ihrem 
Joyce Preis: 139,— DM 

Joyce-Phono-Set: 

bestehend aus RS-232 Schnittstelle, Akustikkoppler, RS- 
232 Datenkabel und einigen nützlichen Tips Keine Soft¬ 
ware zusätzlich erforderlich. Preis: 339,— DM 

Passendes Netzteil für Modem: 19,90 DM 

Bildschirmfilter für Joyce-Monitor Reduziert Flimmern und 

störende Spiegelungen Preis: 64,— DM 

Farbband für Joyce-Drucker. Preis: 19,90 DM 

Joyce-Drucker Verlängerungskabel 

Inklusive Stromverfängerungskabel: 59,— DM 

Papierführung Joyce: Ersetzt die vorhandene .Klappe' 
Durch den verstellbaren Seiten-Anschlag ist ein gerader 
Papiereinzug und genaue seitliche Einstellung vom Druck- 
Anfang möglich. Preis: 37,— DM 

Abdeckhauben für Joyce: 

In bewährter VORTEX-Qualität: 

Satz (Drucker, Tastatur und Monitor) 69,90 DM 


DFÜ (Datenfernübertragung): 

VORTEX-VAK-300 Akustikkoppler: 

Übertragungsgeschwindigkeit: 300 Baud 
Orginate-/Answermodus 

Stromversorgung 9 V Blockbattene/externes Netzteil 
Preis: 198,-- DM 

Netzteil für VAK-300: 17,90 DM 

VORTEX-CPC-Phono-Set - bestehend aus: 
Akustikkoppler VORTEX-VAK-300, Schnittstelle VORTEX- 
RS-232, Netzteil zur Stromversorgung, Diskettensoftware 
und Verbindungskabel Ihr Vorteil: Alles aus einer Hand, d. h 
keine Kompatibilitätsprobleme Nur auspacken und 
anschließen und „datenfernübertragen" 

SONDERPREIS: 490,— DM 

Multi-Link-Kabel 

Durch DIP-Schalter programmierbares RS-232-Kabel. Löst 
95% aller möglichen Verbindungen Kabellänge: 2 Meter 
Stecker/Stecker Preis: 69,90 DM 


VERBINDUNGSKABEL: 


Druckerkabel: 

tür CPC464,664 (2 m Lange Flachbandkabel) 44,— DM 
für CPC 6128 (2 m Länge Flachbandkabel) 44,— DM 

für CPC 6128 (abgeschirmtes Rundkabel) 49,— DM 
Akustikkoppterkabel (zw. RS 232 u Modem) 

1.5 m 49,50 DM 

Anschlußkabel: 2 Floppy an CPC 664 44,50 DM 

Anschlußkabel: 2 Floppy an CPC 6128 44,50 DM 

Monitorverlängerung für CPC 464 22,90 DM 

Monitorverlängerung für CPC 664 und 6128 28,90 DM 

Joystickverlängerung für 1 Joystick (3 m Länge) 14,90 DM 
Recorderanschluß (CPC an 5-pol. DIN Buchse) 17,90 DM 
Recorderanschluß (CPC an Klinkenbuchse) 17,90 DM 
CPC-Stereokabel zum Anschluß an HiFi-Anlage 15,90 DM 
Schneider^Joystlckadapter 

zum Anschluß von 2 Joysticks 15,90 DM 


Datenrecorder: Zum Laden und Speichern von Kassetten¬ 
software auf dem CPC 664 und CPC 6128. Im Preis ist das 
Datenübertragungs- und das Netzkabel enthalten Auch für 
Batteriebetrieb geeignet und als normaler Musikrecorder 
verwendbar Preis: 89,— DM 

Diskettenreinigungsset: 

für 5>A" Laufwerke: 24,95 DM 

für Vh" Laufwerke: 15,90 DM 


MUSIK-PERIPHERIE 


The Music-Machine: 

Die Hardware-Ergänzung für Ihren CPC 

• Digitaler Schlagzeuggenerator 

• Geräuschgenerator 

• einstimmiger Synthesizer 

• Komponieren, mischen und editieren verschiedener 
Taktfolgen 

• digitale Aufzeichnungsmöglichkeit 

• Echo und Hallgerät 

• Midischnittstelle 

• Anschlüße: Midi In, Midi Out, Midi Through, 

Kopfhörer, Verstärker und Mikrophon 

• Lieferumfang: Schnittstelle, Handbuch, Mikrophone 
und Software. 

Sollten Sie diese Daten noch nicht überzeugt haben, for¬ 
dern Sie unseren Sonderprospekt „The Music Machine" an 
Preis: CPC 464: 189,—DM, CPC 6128: 249,—DM 

CPC 664: 219,— DM 

AMDRUM: Digitales Schlagzeug für CPC 464/664/6126 

- 8 digital aufgenommene Schlagzeugsounds 

- ein echter digitaler Drumcomputer 

- Echtzeitprogrammierung am Bildschirm 

- komplett mit Software und ausführlicher Anleitung 

- Lieder können auf Kassette/Diskette.gesichert werden 

Preis: 119,—DM 

Latin-Kit: 

8 verschiedene lateinamerikanische Rhythmen 
inclusive Editor Cas 19,90 DM 


DRUCKERZUBEHÖR: 


Druckerständer: 

Papierzuführung wahlweise von unten oder hinten, sehr 
stabile Ausführung, Nutzfläche: 40x32 cm. 

Preis: 


55,— DM 


Farbbänder: 

NLQ 401, MPS 803, Brother 1009, 

Centronics GLP: 

Panasonic KX-P 1080,1090,1091, 1092,1592: 
Riteman F+/C+, DMP 2000 
Joyce-Drucker, Seikosha SP 800: 

SP 1000, Thomson PR90: 

Okidata ML 182, ML 183, ML 192, ML 193 


13.90 DM 

29.90 DM 

26.90 DM 

19.90 DM 

11.90 DM 

19.90 DM 

Traktorführung: 

Zur problemlosen Verarbeitung von Endlos-EDV-Papier. 
Für Schneider NLQ 401: 69,90 DM 

Für Okidata ML 182/192: 79,— DM 


PFLEGEMITTEL: 


ORIGINAL VORTEX-ABDECKHAUBEN: 

Schützen Sie nicht nur Ihre Schneider-, sondern auch Ihre 
VORTEX-Hardware vor Verschmutzung: 

Schneider Floppy DDI-1 1 6.80 DM 

VORTEX Floppy Fl-S o Fl-D 19,60 DM 

Schneider Konsole für 464 und 664 19.80 DM 

Schneider Konsole für 6128 19,80 DM 

VORTEX Floppy F1-X und M1-X 19.80 DM 

Schneider Monitor grün 24,80 DM 

Schneider Monitor color 26,80 DM 

Schneider NLQ 401 19,80 DM 

Schneider DMP 2000 22,80 DM 


DISKETTEN: 


5'/4” VORTEX-DISK DS/DD 96 tpl 10 Stk 59,— DM 

3'/2" VORTEX-DISK DS/DD 135 tpi 10 Stk 69,— DM 

3" DISK CF-2 5 Stk./IO Stk 49,90/89,— DM 

3" DISK CF-2 DD (Joyce 8512) 5 Stk 99,— DM 


DISKETTENBOXEN: 


3" Diskbox für 10 Disketten 
3" Diskbox für 40 Disketten 
dto. 

5Va" Diskbox für 50 Disketten 
5 V 4 ” Diskbox für 85 Disketten abschließbar 


14,80 DM 

38.90 DM 
abschließbar 53,90 DM 

36.90 DM 

39.90 DM 


3/2" Diskbox für 40 Disketten 


38,90 DM 

3Vs" Diskbox für 80 Disketten 


44,90 DM 

SPIELE: 

1942 

C/D 

29,90/39,90 DM 

LIGHT FORCE 

C/D 

29,90/39,90 DM 

GHOST'N GOBLINS 

C/D 

29,90/39,90 DM 

GREEN BERET 

C/D 

32,90/39,90 DM 

BAT MAN 

C/D 

29,90/42,90 DM 

EOUINOX 

C/D 

33,90/45,— DM 

KNIGHT GAMES 

C/D 

34,90/49,90 DM 

HEXENKÜCHE TEIL II 

C/D 

29,-/42,90 DM 

IMPOSSIBLE MISSION 

C/D 

39,—/49,— DM 

GOONIES 

C/D 

39,—/59,~ DM 

INTERNATIONAL KARATE 

C/D 

29,90/39,90 DM 

MELTDOWN 

C/D 

27,90/34,90 DM 

JACK THE NIPPER 

C/O 

31,90/48,90 DM 

NEXUS 

C/D 

35,90/40,90 DM 

NIGHT GUNNER 

C/D 

29,-/46,90 DM 

PACIFIC 

C/D 

33,90/46,90 DM 

RESCUE ON FRACTALUS 

C/D 

35,90/48,90 DM 

DAN DARE 

C/D 

32,90/42,90 DM 

BEACH HEAD II 

C/D 

39,—/59,— DM 

TEMPEST 

C/D 

36,—/48,— DM 

GALVAN 

C/D 

32,90/43,90 DM 

DRUID 

C/D 

27,-/49,90 DM 

SPLIT PERSONALITIES 

C/D 

29,90/39,90 DM 

FIRELORD 

C/D 

29,90/49,90 DM 

IKARI WARRIERS 

C/D 

29,90/39,90 DM 

KETTLE 

C/D 

30,90/43.90 DM 

BOMB JACK II 

C/D 

27,90/44,90 DM 

MARBLE MADNESS 

C 

34,90 DM 

SPACE HARRI ER 

C/D 

28,90/46,90 DM 

ANNALS OF ROME 

C/D 

39,90/49,90 DM 

JAILBREAK 

C/D 

29,90/56,90 DM 

ACE 

C/D 

34,90/54,90 DM 

SILENT SERVICE 

C/D 

32,90/54,90 DM 

HACKER II 

C/D 

32,90/49,90 DM 

DONKEY KONG 

C/D 

29,90/47,90 DM 

STAR GLIDER 

C/D 

54,90/79,90 DM 
35,90/49,90 DM 

SPACE SHUTTLE 

C/D 

GAUNTLET 

C/D 

34,90/48,90 DM 


ANWENDER-SOFTWARE: 


Bei Bestellung bitte Rechnertyp und Diskettenformat ange¬ 
ben: 

ACB (Arcade Construction Set): 

siehe Tost CPC 9/86 für CPC 464 (Cas) 44,90 DM 

d'Base II, Wordstar, Multiplan je 198, — DM 

Turbo Pascal 3.0 219, — DM 

Turbo Pascal 3.0 (m Graphikunlerstützung) 279, — DM 
Turbo-Lader Grundpaket 125, — DM 

Turbo-Lader Business 148, — DM 

Turbo-Lader Science 189, — DM 

Star-Datei (Sybex) 85,— DM 

Assembler-Kurs (Sybex) 75. — DM 


vortex-Versand • Falterstraße • 7101 Flein 


NÜTZLICHES ZUBEHÖR: 


VORTEX-Monitorständer: Dreh- und schwenkbar in allen 
Richtungen Für alle 12" Monitore. Solide Ausführung aus 
bruchfestem Kunststoff Preis: 39,90 DM 

Micro-T-Schalter: Ein Schnittstellenumschalter mit dem 
Sie 2 Drucker an 1 Computer (oder umgekehrt) anschließen 
können Einfache Drucktastenumschaltung, auch für alle 
anderen Peripheriegeräte Optional mit RS 232/V 24 oder 
Centronics-Schnittstelle Preis: 139,— DM 

TURBO/S 

Joystick speziell für Schneider-Computer. Ausgestattet mit 
einer Feuerlaste im Griff, integrierter 9-poliger Stecker zum 
Anschluß für Zweit-Joystick. Fester Stand durch vier Saug- 
füße 

Preis: 33,90 DM 


O Senden Sie mir Ihren Katalog {Schutzgebühr DM 3,-, bei Bestellung ab DM 100,- frei) 

O Senden Sie mir umgehend folgende Artikel aus Ihrem Angebot: 

O per Nachnahme O per Euro-Scheck 

_ DM 

I- DM 

- DM 

- DM 

bei Aufträgen bis DM 200,- Versandkostenpauschale DM 5,90 DM 

Absender: Gesamtsumme _DM 


Bildschirmfilter: Vorsatz-Filter, reduziert störende Spiege¬ 
lungen und Flimmern, wird mit einem Klebeband-Klettver¬ 
schluß am Gehäuse befestigt. Filter aus Gewebe auf Kunst¬ 
stoffrahmen 

Für Farbmonitor CTM 640/644 79,— DM 

Für Grünmonitor GT 64/65 (bis 12/85) 59,— DM 


Telefon-Nr---Unterschrift_ 

Alle Lieferungen erfolgen auf Grund unserer Allgemeinen Geschäftsbedingungen 
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PC mit oder ohne 
Markenzeichen 

Seit Schneider mit seinem PC 1512 auf dem Markt für Kompatible mit¬ 
mischt, ist verstärkte Bewegung auf diesem ohnehin nicht gerade starren 
Feld zu verspüren. Die »Namenlosen« sind noch preiswerter geworden, und 
das Unterschreiten der 1000, - DM-Preisgrenze ist wohl nur noch eine Fra¬ 
ge der Zeit. Für den potentiellen Käufer wird die Qual der Wahl beileibe 
nicht kleiner. 


Schon zwei Monate nach der Einfüh¬ 
rung des Schneider PC 1512 sollen 
mehr als 30.000 Geräte abgesetzt wor¬ 
den sein. Solche Verkaufszahlen wür¬ 
den vielen Heimcomputer-Herstellem 
wohltuen, und es ist nicht verwunder¬ 
lich, daß einige Konkurrenten von 
Schneider den PC 1512 gerne in die¬ 
se Kategorie Computer eingeordnet 
wissen möchten. 


Die Preise purzeln weiter 

Natürlich ist der Schneider PC ein 
vollwertiger PC, so wie das alle an¬ 
deren »zum Industriestandard kompa¬ 
tiblen« Geräte auch sind, auch wenn 
ein PC vielleicht bald der am meisten 
im »Heim« vorhandene Computer sein 
wird. Auch wenn mit dem Schneider 
den Firmen mit etablierten PC- 
Markenzeichen sicher ein Teil ihres 
Kuchens am PC-Markt weggenommen 
wird, sind die Hauptleidenden wohl in 
jedem Fall im Heer der »namenlosen« 
Clones zu suchen. Kein Wunder also, 
daß gerade diese Gruppe mit einem 
Überdenken der Kalkulation und der 
damit verbundenen Preiskorrektur rea¬ 
gieren. 

So ist es heute bereits möglich, für we¬ 
niger als 1100, — DM einen sogenann¬ 
ten 100% IBM-kompatiblen Rechner 
zu erstehen, also praktisch alle Soft¬ 
ware, welche für den IBM PC ge¬ 
schrieben ist, kann verwendet werden. 
Da ergibt sich die Frage, warum man 
überhaupt einen teuren Rechner ins 
Auge fassen sollte. Letztlich werden 
die Teile ja doch alle in Fernost her¬ 
gestellt, ob es sich nun um ein teures 
oder ein preiswertes Modell handelt. 
Eines sollte man in jedem Fall beden¬ 
ken, auch die Vertreiber von »Billig¬ 
PC ’ s« wollen an ihrem Geschäft ver¬ 


dienen, und in aller Regel tun sie dies 
auch. Andererseits soll dies nicht hei¬ 
ßen, daß man für mehr Geld in jedem 
Fall bessere Ware bekommt. Es lohnt 
sich sicher, sich ein wenig mit dem 
Angebot auseinanderzusetzen, um ei¬ 
nen wirklich preiswerten Kauf tätigen 
zu können. 

Wie bei allen anderen Dingen auch, 
ist es wichtig, Gleiches mit Gleichem 
zu vergleichen. Dabei ist hier in er¬ 
ster Linie die gleiche Ausstattung ge¬ 
meint, mögliche Qualitätsunterschiede 
in der Hardware sollen für diesen Be¬ 
richt mehr oder weniger außer Acht 
gelassen werden. 

Als Vergleichsgrundlage soll hier ein 
Rechner mit 512 KByte RAM- 
Speicher, zwei Diskettenlaufwerken, 
einem Monitor sowie dem dem MS- 
DOS Betriebssystem, einem BASIC- 
Interpreter sowie einer Beschreibung 
(Handbuch) zugrunde gelegt werden. 
Dies ist eigentlich das Minimum, über 
welches man früher oder später doch 
verfugen wird, selbst wenn am Anfang 
vielleicht auf eines der Laufwerke oder 
die 512 K Speicher nicht notwendig 
erscheinen. Die Praxis sieht für die 
meisten Computerkäufer sowieso an¬ 
ders aus, im Laufe der Zeit werden 
Schnittstellen, Multifunktionskarte 
oder andere Erweiterungen, vor allem 
eine Menge Software angeschafft. 
Für einen Schneider PC muß man 
hierfür fast genau 2500, — DM hin- 
blättem, und an diesem Preis kann 
wohl kaum gerüttelt werden. Wie sieht 
es bei der Konkurrenz aus dem Be¬ 
reich »Namenloser« aus? Die Grund¬ 
konfiguration kann, wie schon 
erwähnt, für etwa 1100, — DM erstan¬ 
den werden. Dies bezieht sich auf ei¬ 
nen Rechner mit 256 KByte RAM und 
ein Diskettenlaufwerk. Monitor und 
Betriebssystem müssen in jedem Fall 


dazugekauft werden, ein Rechner ohne 
Betriebssystem ist soviel wert wie ein 
Auto ohne Benzin! MS-DOS kostet ca. 
150,— DM, ein Monitor siedelt sich 
bei 200, — DM an. Die zweite Disket¬ 
tenstation schlägt noch einmal mit 
mindestens 250,— DM zu. Dazu 
kommt noch die Speichererweiterung, 
welche je nach Vertreiber zwischen 
100,— und 250,— DM ausmacht. 

Zusammen sind dies 690, — DM Auf¬ 
preis, die man zum ursprünglichen 
Angebot hinzuzählen muß, also bei 
1790, - DM landet. Es fehlt aber noch 
das BASIC, welches mindestens 
100, - DM ausmacht. Wenn alles gut 
geht, hat man in diesen Preisen Hand¬ 
bücher für MS-DOS und BASIC in¬ 
begriffen, normal ist dies allerdings 
nicht. Es fällt auf, daß oftmals dieje¬ 
nigen Vertreiber, die mit einem beson¬ 
ders niedrigen Grundpreis aufwarten, 
nur die etwas teureren Laufwerke oder 
die besonders gut verarbeiteten Spei¬ 
chererweiterungen im Angebot 
haben... 

Dennoch, den 2500,— DM für den 
Schneider stehen etwa 1900,— DM 
für das »Superpreiswerte-Angebot« ge¬ 
genüber. Was rechtfertigt diesen hö¬ 
heren Preis? Nun, der Schneider bietet 
da tatsächlich einige weitere Dinge, 
die nicht unerheblich sind. Da ist zu¬ 
nächst einmal die Maus, welche im 
Handel von 150,- DM an aufwärts 
zu haben ist. Verbunden damit ist das 
Betriebssystem GEM, für welches 
150, - DM auf den Tisch gelegt wer¬ 
den müssen. Weiterhin hat der Schnei¬ 
der eine serielle Schnittstelle (100, — 
DM), eine Color-Grafikkarte (150,— 
DM) und eine eingebaute, batteriege¬ 
pufferte Uhr (100,- DM) serienmä¬ 
ßig im Lieferumfang. 

Diese Posten zusammen machen also 
650,— DM aus, würden das Billig- 
Angebot also auf den gleichen Preis 
wie den Schneider bringen. Nun er¬ 
gibt sich allerdings die Frage, ob man 
dies Zubehör überhaupt haben und be¬ 
nutzen möchte. Wer seinen Compu¬ 
ter nur für eine ganz spezielle Aufgabe 
benutzen möchte, etwa als Schach¬ 
computer oder zur Lagerverwaltung, 
und das entsprechende Programm da¬ 
zukauft, kann sicher auf Maus, GEM 
und sogar den BASIC-Interpreter ver¬ 
zichten. 


80 PG 4’87 






Professional Computing— i 


Jedoch sollte man nicht vergessen, daß 
ein Computer ein Universalgerät ist. 
In aller Regel wird auch derjenige sei¬ 
nen Rechner für andere als die ur¬ 
sprünglich vorgesehenen Aufgaben 
einsetzen wollen, der ihn eigentlich 
nur für ein bestimmtes Programm an¬ 
geschafft hat. Hat man einmal dieses 
Stadium erreicht, wird man die Fähig¬ 
keiten einer Benutzeroberfläche wie 
GEM nicht mehr missen wollen, so¬ 
fern man sie zur Verfügung hat. 

Die Erfahrung zeigt, daß die Anschaf¬ 
fung eines Computers im Endeffekt 
doch weit mehr Geld verschlingt, als 
man anfangs plant, ob man es nun will 
oder nicht. Die »Billig-Kompatiblen« 
haben gerade was die Erweiterungen 
angeht auf den ersten Blick einen deut¬ 
lichen Vorteil gegenüber dem Schnei¬ 
der, sind sie doch mit fünf oder bis zu 
acht freien Steckplätzen ausgestattet, 
wohingegen der Schneider-Besitzer 
sich mit deren drei zufrieden geben 
muß. 

Doch auch hier hinkt der Vergleich ein 
wenig, serielle Schnittstelle und bat¬ 


teriegepufferte Uhr sind beim Schnei¬ 
der vorhanden, nehmen bei den 
Billig-Angeboten beim Nachträglichen 
Aufrüsten aber Steckplätze weg. 


Billig ist nicht unbedingt billig 

Der Schneider PC hat aber noch eine 
Reihe von Vorzügen, welche nicht un¬ 
bedingt von der Hand zu weisen sind. 
So beinhaltet das Gerät sogar ein klei¬ 
nes Textverarbeitungsprogramm, wel¬ 
ches bis zu 750 Zeilen, das sind 
immerhin 11 bis 12 Seiten, verarbei¬ 
ten kann, für Briefe und andere klei¬ 
nere Dokumente also durchaus 
ausreichend. Das zweite Betriebssy¬ 
stem, welches mit dem Schneider ge¬ 
liefert wird, DOS + , ist nicht nur 
MS-DOS-kompatibel, es kann auch 
CP/M 86 verarbeiten. 

Betrachtet man die Situation in diesem 
Licht, so erscheinen die Preis vorteile 
der Billig-Angebote in einem etwas 
anderen Licht, ja sogar in leichte 
Nachteile umzuschlagen. Andererseits 


werden auch die Vertreiber diese 
Rechnung aufmachen und früher oder 
später versuchen, wirklich preiswer¬ 
te oder aber vollständigere Rechner 
anzubieten. 

In diesem Bericht wurde ausdrücklich 
nicht von Anbietern gesprochen, die 
versuchen, mit qualitativ minderwer¬ 
tigen Bauteilen, oder durch die Ein¬ 
sparung einer Garantie schnell mit 
Sensationsangeboten viel Geld zu ver¬ 
dienen, dann auch sehr schnell wieder 
von der Fläche verschwinden. Sicher 
gibt es auch solche, jedoch täte man 
den Vertreibem gehörig unrecht, sie 
alle in einen Topf zu werfen. Schnei¬ 
der hat gegenüber den kleineren An¬ 
bietern den großen Vorteil, zusammen 
mit Amstrad mit Stückzahlen operie¬ 
ren zu können, die eine ganz andere 
Kalkulation erlauben (und es im Ge¬ 
gensatz zu manch anderer Firma auch 
tut). Es wird nicht einfacher für die 
Billiganbieter, der Kunde allerdings 
kann sich freuen. 

(Peter C. Bosetti) 
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ANWENDERPROGRAMME FÜR CPC UNO JOYCE: 


Laser Basic 

OD 

45-/55- 

Laser Compiler 

ÖD 

45-/55- 

Pagemata 

0 

145- 

Nevaca COBOL Compiler 

(CPC + Joyce) 

D 135- 

Nevaca FORTRAN Compiler 

(CPC + Joyce) 

C 135- 

Hisolt C Compiler 

(CPC + Joyce) 

D 135- 

Pascal MT* Compilei 

(CPC + Joyce) 

1) 135- 

CBASIC Compiler 

(CPC + Joyce) 

0 135- 

DR Draw 

(CPC 6128 + Javce) 0 159, 

0R Graph 

(CPC 6126 <- Joyce) D 159,- 

Wordstar 3 0 

(CPC + Joyce) 

D 1/9,- 

dBase ll 

(CPC + Joyce) 

D 179, 

Mulllplan 

(CPC + Joyce) 

D 179.- 

SPIELE FÜR CPC: 

Fmlord 

C/D 

29-05- 

Hijack 

C/C 

35-/45- 

Dynamits Dan II 

C/D 

29-/45, 

£leclt3 Glide 

C/D 

29.-Z45- 

Kcnami's Coir. 0P Hils 

C/D 

29 -.45 

Camelol Warriors 

C/D 

29.-«5- 

Nosletatu 

C 

29.- 

Oroid 

C/D 

35-45- 

Bohhy Bearing 

ÖD 

29,-449,- 

Sepulcri 

00 

29.-39 - 

Xenp 

C 

29,- 

Hil Peck 

C/D 

35-'39.- 

America’s Cup Chai lange 

C/D 

35-45- 

They so^c a Million I I 

0 

45- 

Legend of Kage 

C/D 

35-45- 

Tartan 

C/D 

25-®.- 

Scooby Ooo 

C/C 

29-/45- 

3 D Thai Boxing 

C/0 

25-45- 

In/odroid 

C/O 

29-/43- 

Silicon Dreams 

c/o 

58-®3- 

Aliens 

C/O 

29-45- 

Gaunltel 

c/o 

35,-45- 

Hacker ll 

C/D 

29.-45- 

Dancy 

C/D 

29.-45- 

Breakthru 

C/D 

59,-45- 

Deep Sinke 

C 

29- 

Goories 

C 

59.- 

Slarglider 

C/D 

45-/65- 

Cityslicker 

CD 

25-/39 - 

Dragor's Lau 

CD 

29,-45- 

Jail Break, 

CiD 

29-49- 

HearHand 

C/D 

29-59- 

TobruJr 

C/D 

2S-I15- 

Trivial Pursuil 

D 

55- 

1942 

C/D 

29-45- 


CIO 25-/39,- 

ÖO 25,-09,- 

C/D 39,-45,- 

C'D 29,-45.- 

C 25- 

C/D 29,-45- 

C/D 25-/39,- 

C/0 35-145- 

C 29- 

C/0 25-/39, 

C/D 29-/39, 

C/O 29,-/39. 

C/O 35-49- 

0 59- 

C/D 29-/45- 

C/D 35-45- 

C/D 29-M9.- 

C/D 29-M5- 

C 29- 

C 29- 

C/D 29-/45- 

C 29,- 

C/D 29, 09,- 

C 15- 

C 29. 

..Neuheiten.. Neuheiten ..Neuhellen...Neuhe 


Wth Frame 

C/D 

35, /45- 

500 CC Grand Pnx 

C 

39- 

An'jriad 

CID 

25-/39,- 

Backon 

c/D 

35-/49- 

Elvator Aclion 

C.D 

29, /33 - 

Fsad 

C 

9,90 

imposMiuii 

Utlte Computer People 

C/D 

D 

29, 45, 

49, 

Mahle Mülness 

C 

29,- 

Shcn Ciroj ’ 

C/D 

29,-/39, 

Wesl Bank 

C/D 

15,-129. 

Xcel 

SPIELE FÜR JOYCE: 

C 

990 

30 Clock Chess 


45- 

Cotossus Chess Vhliime IV 


45- 

Cyrus II Chess 


49, 

Jewels ol Darkness 


69.- 

Silicon Dreams 


69,- 

Bouncet 


39,- 

Classic Collection 


45,- 

Annais of Rome 


65- 

Tau CeP 


59,- 

The Pawn 


69, 

.. Neuheiten ..Neuheilen.,.Neuheiten, „Heuh 

FoolballForlunes 


59- 

Frank Bruno's Boxing 


55- 

Sinke Force Harrier 


45- 


Top Gun 
Space Harriet 
Annais ol Rome 
Xeu-ioos 

Vie Ar Kung Fu II 
One 

Greal Escape 
Kcrami's Gull 
Rogue Troopet 
Slieel Machine 
Fiye Star Games 
Computer Hils 3 
Explorer 
Kororns Rif 
Donkey Kone 
Fcolca etcnhe'fear 
Pal Won 
Eagles Nesl 
DeFcom 
Taooer 
Ace 

Silenl Service 
Fulure KnigM 
Zub 

Arco Jel 



'dirioeslbeslelhve'l DM 30 - Bei Vbrauskassc aul Soltwaie 3 Skonio so-*>re LieteruiKj rrp Maus Drucket und Computer tuzgl DM10,- Pono 
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3D-schach 
auf dem 
Schneider PC 

- PSION und CYRUS 

im Test - 

Als Ende der siebziger Jahre die er¬ 
sten Schach Programme für Micro- 
computer auf dem Markt erschie¬ 
nen, wurden sie von versierten 
Schachspielern nur milde belächelt 

- sie beherrschten nicht einmal al¬ 
le Regeln und spielten ausgespro¬ 
chen schwach. Doch die Entwick¬ 
lung ist seitdem nicht stehengeblie¬ 
ben. Eine verbesserte Hardware und 
ausgereifte Algorithmen vermitteln 
den Micros heutzutage eine enorme 
Spielstärke, und selbst erfahrene 
Schachprofis haben inzwischen 
durch unerwartete Niederlagen ler¬ 
nen müssen, daß sich moderne 
Schachprogramme nicht mehr ne¬ 
benbei abfertigen lassen. 

Für ambitionierte Schachfreunde und 
Vereinsspieler ist der Computer damit 
zum idealen Trainingspartner heran- 
gereift, der nicht nur jederzeit als Geg¬ 
ner zur Verfügung steht, sondern auch 
bei der Analyse komplizierter Stellun¬ 
gen wertvolle Hinweise gibt. Bei 
Schachprogrammen, die auf einer 
schnellen 16 Bit-Maschine wie dem 
Schneider PC laufen, liegen die Er¬ 
wartungen natürlich besonders hoch. 
Zwei Kandidaten für einen Spitzen¬ 
platz unter den PC-Schachmeistem ha¬ 
ben wir deshalb gründlich unter die 
Lupe genommen. Beiden Programmen 

- PSION und CYRUS - ist gemein¬ 
sam, daß sie mit einer dreidimensio¬ 
nalen Darstellung des Schachbrettes 
aufwarten und bereits auf eine länge¬ 
re Tradition als Schachprogramm zu¬ 
rückblicken können. 

CYRUS aus der englischen Pro¬ 
grammschmiede Intelligent Software 
machte bereits 1981 von sich reden, 
als das Programm die europäische 
Schachmeisterschaft für Microcompu- 
ter gewann. Danach tauchte es noch 
auf dem ZX Spectrum und als ROM- 
Modul für den Dragon 32 auf, konn¬ 
te aber in den folgenden Jahren gegen 
die übermächtige Konkurrenz spezia¬ 
lisierter Schachcomputer keinen Blu¬ 


mentopf mehr gewinnen. Eine stark 
verbesserte Version sorgte allerdings 
im Herbst 1985 für einen erneuten Hö¬ 
hepunkt: CYRUS II war das erste 
CPC-Schachprogramm, das durch 
Spielstärke, attraktive grafische Ge¬ 
staltung und Bedienungsfreundlichkeil 
überzeugen konnte. Auch eine Joyce- 
Version ist inzwischen erhältlich. 
PSION CHESS stammt dagegen aus 
einer ganz anderen Ecke. Anfang 1985 
tauchten in den Fachzeitschriften die 
ersten Bildschirmfotos eines 3D- 
Schachbretts auf; PSION auf dem 
Sinclair QL zeichnete dafür verant¬ 
wortlich. Da der QL mit einem Pro¬ 
zessor aus der 68000-Familie arbeitet, 
war dann der Weg zum Apple Macin¬ 
tosh nicht mehr weit, auf dem das Pro¬ 
gramm durch ungebremste 16/32 
Bit-Rechengewalt beeindruckende 
Leistungen zeigte. Der Name des Au¬ 
tors - er taucht übrigens auch in der 
Startmeldung der PC-Version auf - 
erzeugt bei Kennern der Computer¬ 
schachszene einigen Respekt: Richard 
Lang schrieb für die Münchener Fir¬ 
ma Hegener & Glaser ein Programm, 
das unter dem bekannten Namen Me¬ 
phisto bei der Microcomputer- 
Schachweltmeisterschaft 1985 in Am¬ 
sterdam die Konkurrenz förmlich de¬ 


klassierte. Ähnliche Leistungen von 
PSION auf dem Schneider PC zu er¬ 
warten, wäre allerdings zuviel ver¬ 
langt: Das Weltmeisterschaftspro¬ 
gramm wurde immerhin von einem 
echten 32 Bit-Prozessor (Motorola 
68020) ausgeführt. 


CYRUS Amstrad Special 

»Cyrus II Chess - For the Amstrad 
PC 1512 & Compatibles« verkündet 
das englischsprachige Anleitungsheft 
selbstbewußt auf der Titelseite (IBM? 
Wer ist IBM?). Doch wen wundert'.s 
— schließlich wird das Programm von 
Amstrad, dem britischen Schneider- 
Partner, in Lizenz vertrieben. Und in 
der Tat zeigt sich gleich nach dem Pro¬ 
grammstart, daß hier die dem Schnei¬ 
der PC eigene hochauflösenden 
Farbgrafik zur Anwendung kommt: In 
knalligem Grün und Blau macht sich 
das 3D-Schachbrett auf dem Bild¬ 
schirm breit und erheischt Bewunde¬ 
rung. Wie bereits von der CPC- 
Version gewohnt, ziehen die Figuren 
mit trickfilmartiger Eleganz über das 
Spielfeld; als besonderer Clou kommt 
hinzu, daß man das Brett per Tasten- 
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1 20 MB Festplatte 
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für PC 
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stecken, Deckel zu - fertig!) 
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chen pro Sekunde, 8 internationale Zeichensätze, eingebau¬ 
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DRUCKERANSCHLUSSKABEL 


SCHNEIDER DISKETTEN 5V«" 

10 Spezial Schneider Disketten 2 S/DD 
in Kunstoff Archiv-Box gg gg 
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DM 79,- 
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druck aus fünf verschiedenen Blick¬ 
winkeln betrachten kann. Hier handelt 
es sich ohne Zweifel um eine Meister¬ 
leistung der Grafikprogrammierung; 
aber trotzdem ist Kritik angebracht: 
Schon nach kurzer Spieldauer werden 
viele Besitzer eines Farbmonitors ver¬ 
geblich den Menuepunkt »Change Co- 
lors« suchen — offenbar haben die 
Programmierer nicht bedacht, daß 
Schachspieler mitunter stundenlang 
auf das Brett starren, wobei die Far¬ 
ben alles andere als augenfreundlich 
wirken. Allerdings gibt es für dieses 
Problem eine elegante Lösung: Man 
nehme ein richtiges Schachbrett und 
stelle es neben den Computer. 

Bei Bedarf und je nach Geschmack 
kann man auch auf ein normales 2D- 
Schachdiagramm umschalten, das 
durch seine großflächige Darstellung 
einen sehr guten Überblick gewährt. 
Im Gegensatz zur CPC-Version wur¬ 
de hier jedoch aus unverständlichen 
Gründen auf die Animation der Figu¬ 
ren verzichtet. Ohne sich sonstwie be¬ 
merkbar zu machen, springen sie 
blitzartig auf ihren neuen Platz, so daß 
man die Züge des Rechners leicht ver¬ 
paßt. Zwar kann in der untersten Zei¬ 
le ein Ausschnitt aus dem Partie¬ 
protokoll eingeblendet werden, das 
über die letzten Züge informiert; wer 
mit der Schachnotation nicht vertraut 
ist, wird hier allerdings Probleme ha¬ 
ben: Erstens sind die Zahlen und 
Buchstaben nicht am Brettrand ver¬ 
merkt, und zweitens erfolgen die An¬ 
gaben mit englischen Abkürzungen. 
Zum Beispiel heißt B nicht etwa Bau¬ 
er, sondern Läufer (Bishop), dafür be¬ 
zeichnet dann P (Pawn) den 
Ackersmann. 

Durch Drücken der Funktionstaste F1 
kann jederzeit eine Hilfsseite aufgeru¬ 
fen werden, die über das reichhaltige 
Repertoire verfügbarer Kommandos 
Auskunft gibt. Damit man die aktuel¬ 
le Stellung nicht aus den Augen ver¬ 
liert, befindet sich rechts oben eine 
Miniausgabe des Schachbretts, bei der 
die Figuren provisorisch durch Buch¬ 
staben dargestellt werden. Leider hat 
diese im Prinzip gute Idee einen 
Schönheitsfehler: Die weißen Buchsta¬ 
ben auf den hellen Feldern lassen sich 


kaum erkennen. Ansonsten sind die 
Hilfsseiten und die über Funktionsta¬ 
sten erreichbaren Untermenues über¬ 
sichtlich und informativ gestaltet, so 
daß man das Anleitungsheft nur sel¬ 
ten zu Rate ziehen muß. 


PSION Schlicht und ergreifend 

Nach dem Start unter MS-DOS möch¬ 
te das Programm zunächst wissen, mit 
welcher Grafikkarte es zu tun hat; »F« 
für Farbgrafik ist bei dem Schneider 
PC das Gegebene. Wer jetzt einen in 
allen Farben schillernden Bildschirm 
erwartet, erlebt jedoch eine Enttäu¬ 
schung: In schlichtem Schwarz-Weiß 
präsentiert sich ein normales 2D- 
Schachdiagramm, das seinen Platz, mit 
dem Partieprotokoll und einer Menue- 
leiste teilt und aus diesem Grund ein 
ganzes Stück kleiner als bei CYRUS 
ausfallt. Die Anzeige der verfügbaren 
Kommandos erspart allerdings einen 
häufigen Wechsel zwischen Brettdar¬ 
stellung und Hilfsseite, solange man 
die wichtigsten Befehle noch nicht aus¬ 
wendig kennt; weiterhin hat man die 
Stellungsbewertung, die vorangegan¬ 
genen Züge, den eingestellten Level 
und die Schachuhr auch während des 
Spiels ständig im Blick. Ein besonde¬ 
rer Pluspunkt ist dabei, daß alle An¬ 
gaben in Deutsch erfolgen: Mit der 
Taste Fl kann man eine sechs Bild¬ 
schirmseiten umfassende deutsche An¬ 
leitung abrufen, und beim Aufbau von 
Schachstellungen hören die Figuren 
auf vertraute Kürzel: Nach Drücken 
von B erscheint ein Bauer, nach D ei¬ 
ne Dame usw. Wer sich trotzdem in 
Fremdsprachen fortbilden will, kann 
sich über die Taste F4 auch wahlwei¬ 
se in Englisch oder Französisch bedie¬ 
nen lassen. 

Soweit, so gut — was ist jetzt aber mit 
dem 3D-Schachbrett, das PSION 
schließlich als erstes Schachprogramm 
einführte? Hier hilft die Taste F2: Zu¬ 
nächst setzt sich das Laufwerk in Gang 
- bei jedem Wechsel der Darstellung 
muß ein Programmteil von Diskette 
nachgeladen werden - und dann baut 
sich in Windeseile die Grafik auf, 
ebenfalls in Schwarz-Weiß. Sowohl 


hier als auch auf dem 2D-Diagramm 
gleiten die Figuren sauber animiert wie 
von Geisterhand geführt über das 
Brett. Durch das Fehlen der Farbkon¬ 
traste und verschiedenen Blickwinkel 
wirkt der Anblick zwar nicht so spek¬ 
takulär wie bei CYRUS, erfüllt aber 
durchaus seinen Zweck. Wer längere 
Partien mit voller Konzentration spielt, 
wird jedoch das 2D-Diagramm bevor¬ 
zugen und das 3D-Darstellung eher als 
nette Zugabe betrachten: Die Über¬ 
sicht ist insbesondere bei vielen Figu¬ 
ren auf dem Brett etwas eingeschränkt; 
weiterhin fehlen hier die Menueleiste 
und die ergänzenden Informationen 
zum Partieverlauf. 

Vergleicht man nun beide Programme 
in ihrem »Outfit« und der Bedienungs¬ 
konzeption, so drängt sich der Ein¬ 
druck auf, daß bei PSION mit weniger 
Aufwand im Endeffekt mehr erreicht 
wurde. Das Programm wirkt einfach 
funktioneller: Die schlichte Schwarz- 
Weiß-Grafik erweist sich auf einem 
Farbmonitor bei längerer Spieldauer 
als augenfreundlicher, und die zahlrei¬ 
chen Optionen der Menueleiste kom¬ 
men locker mit einer Bildschirmseite 
aus, während man bei CYRUS zwi¬ 
schen der Brettdarstellung, der Hilfs¬ 
seite und weiteren Untermenues 
wechseln muß, um spezielle Funktio¬ 
nen auszuführen. Doch letztendlich ist 
eine solche Beurteilung Geschmacks¬ 
sache: Wer gerne bunte Grafik auf sei¬ 
nem Monitor sieht, ist mit CYRUS 
sicherlich gut beraten. 


Starke Gegner... 

Grafik hin, Bedienungskomfort her — 
aber wie stark spielen nun PSION und 
CYRUS? Um das herauszufinden, 
liegt es nahe, die Programme einfach 
gegeneinander spielen zu lassen. Doch 
dieses Testverfahren hat seine Tücken: 
Uns ist zum Beispiel das Ergebnis ei¬ 
nes Leistungsvergleichs über 12 Par¬ 
tien bekannt, bei dem Programm A 
mit 10:2 gegen Programm B gewin¬ 
nen konnte. Die Aussagekraft des Er¬ 
gebnisses ist jedoch gleich Null: Beide 
Programme waren identisch, hier 
spielte nämlich ein Schachcomputer 
im Demomodus gegen sich selbst, wo- 
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bei dem Spieler mit der Bezeichnung 
A abwechselnd schwarz und weiß zu¬ 
gewiesen wurde! insbesondere bei 
ebenbürtigen Gegnern können solche 
Zufallseinflüsse einen vollkommen 
falschen Eindruck vermitteln, wie man 
sieht. 

Aus diesem Grund - und auch, um 
nicht zwei PC’s stundenlang durch 
Partien unter Turnierbedingung zu 
blockieren — haben wir beide Pro¬ 
gramme mit ausgewählten Teststellun¬ 
gen konfrontiert, die einige Rück¬ 
schlüsse auf das Spielverhalten zulas¬ 
sen. Natürlich ist die Leistungsfähig¬ 
keit genau wie beim Menschen von der 
Bedenkzeit abhängig. Deshalb bieten 
beide Programme mehrere Schwierig¬ 
keitsgrade an, bei denen die durch¬ 
schnittliche Rechenzeit pro Zug von 
1 Sekunde für Anfänger bis turnier- 
mäßigen 3—4 Minuten reicht. Dazu 
kommt noch eine Analysestufe, in der 
die Programme bis zum Abbruch über 
die Tastatur rechnen. In einer speziel¬ 
len Stufe paßt sich PSION sogar au¬ 
tomatisch der Bedenkzeit des mensch¬ 
lichen Gegners an. Weiterhin kann 
man bei diesem Programm mit der 
Option »Handicap« verhindern, daß es 
die gegnerische Bedenkzeit für voraus¬ 
schauende Berechnungen ausnutzt 
(»Permanent Brain«), wodurch die 
Spielstarke noch weiter sinkt. Solche 
Kunstgriffe sind in der Tat bei moder¬ 
nen Programmen nötig, um auch An¬ 
fängern eine Chance zu geben. 

Schauen wir uns jetzt die Leistungen 
in verschiedenen Partiephasen an. Die 
ersten Züge werden mit einer umfang¬ 
reichen Eröffnungsbibliothek bestrit¬ 
ten; bei CYRUS ist von mehr als 
16000 gespeicherten Zügen die Rede, 
PSION verfügt nach Herstelleranga¬ 
ben über 4000 gespeicherte Positionen 
- Zahlen, die ohne weitere Informa¬ 
tionen nur die Größenordnung andeu¬ 
ten. Immerhin dürfte ein solches 
Eröffnungsrepertoire das Wissen der 
meisten Vereinsspieler erreichen, 
wenn nicht gar übertreffen. Interessant 
wird es natürlich, wenn man durch un¬ 
gewöhnliche Züge den Computer aus 
der vorprogrammierten Bibliothek 
herauswirft, so daß er die Antwort be¬ 
rechnen muß. Erfahrene Spieler kön¬ 
nen auf diese Weise einen Stellungs¬ 
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vorteil erlangen, indem sie das Pro¬ 
gramm in eine Situation bringen, die 
es mangels strategischen Feingefühls 
nicht richtig behandelt. Doch um den 
positioneilen Vorteil in einen Sieg um¬ 
zuwandeln, muß zunächst das durch 
taktische Kombinationen geprägte 
Mittelspiel überstanden werden, und 
gerade hier entfalten Schachprogram¬ 
me ihr größtes Können. 


...mit heißen Kombinationen 


Auch CYRUS und PSION laufen in 
dieser Partiephase zu Höchstform auf: 
Beide Programme sind bereits bei Re¬ 
chenzeiten ab 30 Sekunden in der La¬ 
ge, vier- und mitunter sogar fünfzü¬ 
gige Kombinationen zu finden, mit de¬ 
nen sie Material gewinnen oder den 
Gegner mattsetzen, wie die folgenden 
Beispiele zeigen: 

Stellung 1: 

In dieser Stellung aus der Partie Bo- 
goljubow — Monticelli (San Remo 
1930) war Schwarz am Zug und nutzte 
die luftige Stellung des weißen Königs 
gnadenlos für einen Mattangriff aus: 

1. ... Sf4-e2 + ! 

2. Td2xe2 Tf8-fl-t-! 

3. Kglxfl Dc6-hl + 

4. Kgl-f2 Se5-g4 # 

CYRUS hat mit diesem Sprin¬ 
ger/Turm-Opfer keine Schwierigkei¬ 
ten und braucht nur 45 scc bis zur 
Lösung. PSION benötigt zwar eine 
Minute mehr, wandelt dafür aber in 
der folgenden Stellung auf den Spu¬ 
ren des genialen Weltmeisters Al- 
jechin: 

Stellung 2: 

Mit Weiß zog dieser Tf7xg7, was 
zwar durch Tf8xf6 den Springer ko¬ 
stet, aber nach dem feinen Zug Kf4-c5 
weiß das gewalttätige Gebäude nicht 
mehr, wohin - geht der Turm auf die 
Grundlinie nach f8 zurück, so folgt ein 
Matt in zwei Zügen, wie der Leser 
selbst ausprobieren mag. Etwas mehr 
als 30 Sekunden Bedenkzeit kostet 
PSION diese Kombination; CYRUS 
muß hier jedoch selbst in der höchsten 
Spiel stufe passen. 
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Auch in der Turnierstufe finden die 
Programme nicht jede vierzügige 
Kombination, da kein Mikrocomputer 
in der Lage ist, innerhalb von drei Mi¬ 
nuten sämtliche Zugfolgen so weit 
vorauszuberechnen. Ab einer be¬ 
stimmten Rechentiefe werden deshalb 
nur noch besonders interessante Zü¬ 
ge ausgewählt, also z.B. Schlagzüge 
und Züge, die Schach bieten. Hier 
liegt es am Programmierer, wirksame 
Kriterien zum Erkennen »interessan¬ 
ter« Züge einzubauen. Sorgen berei¬ 
ten dabei »ruhige« Züge, die keine 
unmittelbar erkennbare Wirkung ha¬ 
ben. Das folgende Beispiel stellt des¬ 
halb viele Schachprogramme vor 
Probleme: 

Stellung 3: 

Das vierzügige Matt wird durch ein 
Dameopfer eingeleitet: 

1. Dblxh7! Kh8xh7 

2. Te3-h3 Kh7-g8 

3. Sf4-g6 beliebig 

4. Th3-h8 # 

Der »ruhige« dritte Zug von Weiß 
sorgt dafür, daß unsere beiden Kan¬ 
didaten in allen Spielstufen versagen. 
In der Analysestufe benötigt PSION 
gar eine halbe Stunde, um den ersten 
Zug zu finden, CYRUS ist hier jedoch 
erstaunlich schnell: Nach knapp vier 
Minuten weiß das Programm Be¬ 
scheid, was der Anwender allerdings 
nur merkt, wenn er die Anzeige der 
Hauptvariante (die für den Rechner 
wahrscheinlichste Zugfolge) einschal¬ 
tet. Entgegen der Aussage im Anlei¬ 
tungsheft bricht CYRUS nach Auf¬ 
finden des forcierten Matts nicht ab. 
sondern rechnet munter weiter — wa¬ 
rum. das wissen wohl nur die Pro¬ 
grammierer von Intelligent Software. 


Endspielstimmung 

Hat der kundige Schachspieler die tak¬ 
tischen Gemeinheiten von CYRUS 
oder PSION im Mittelspiel überlebt, 
so bekommt er Gelegenheit, sich mit 
den Endspielfähigkeiten der Program¬ 
me auseinanderzusetzen. Hier befin¬ 
den sich nur noch wenige Figuren auf 
dem Brett, und langfristig wirksame 


strategische Entscheidungen erfordern 
oft ein spezielles Schachwissen. Solan¬ 
ge sich die Stellungen noch mit roher 
Rechengewalt analysieren lassen, ma¬ 
chen unsere beiden Freunde jedoch 
weiterhin kurzen Prozeß: 

Stellung 4: 

Hier ist Weiß am Zug, und es stellt 
sich die Frage, welcher Bauer zuerst 
das Rennen macht und sich in eine Da¬ 
me verwandelt. Eilt der weiße h-Bauer 
sofort von dannen, so antwortet 
Schwarz a6xb5, kann Schritt halten 
und hat im Endeffekt einen Bauern 
mehr. Will Weiß den b-Bauern zuerst 
mit b5xa6 abtauschen, so antwortet 
Schwarz frech b7-b5 und kann sogar 
die weiße Dame erobern: 


1 . 

b5xa6? 

b7-b5 

2. 

h2-h4 

b5-b4 

3. 

h4-h5 

b4-b3 

4. 

h5-h6 

b3-b2 

5. 

h6-h7 

b2-blD 

6. 

h7-h8D 

Dbl-b8 + 

7. 

Kc8-d7 

Db8xh8 


Was also tun? PSION findet nach 30 
Sekunden den Zug b5-b6 + ! Nimmt 
Schwarz das Opfer an, so ist der b- 
Bauer durch den eigenen König 
blockiert, und der schwarze a-Bauer 
wird von der zukünftigen weißen Da¬ 
me über die Diagonale h8-al abgefan¬ 
gen — wer's nicht glaubt, soll es 
ausprobieren. Auch CYRUS zeigt be¬ 
reits nach 30 Sekunden den richtigen 
Zug in der Hauptvariante an, die Stel¬ 
lungsbewertung verrät allerdings noch 
nicht das Plus von einer Dame — ob 
das Programm wohl »intuitiv« ahnt, 
daß es nur dieser Zug bringt? 

Hier blicken unsere Kandidaten also 
noch voll durch, aber wie sieht es mit 
dem elementaren Endspiel König und 
Bauer gegen König aus? Bei richtiger 
Spielweise ist die folgende Stellung für 
Weiß am Zug immer gewonnen, da 
der König mit Kd3-d4 die sogenannte 
Nahopposition erreichen kann: 

— weißer Bauer auf d2 

— weißer König auf d3 

— schwarzer König auf d6 

Wird es CYRUS gelingen, den Nach¬ 
weis zu führen? Ein Versuch fördert 
Erstaunliches zu Tage: Souverän und 
ohne auch nur eine Sekunde nachzu¬ 


denken bringt das Programm seinen 
Bauern zur Dame durch und gewinnt 
die Partie. Ohne Zweifel — das Pro¬ 
gramm enthält einen Spezialalgorith¬ 
mus für diese Art von Endspielen: 
PSION versucht dagegen, die Stellung 
mit der normalen Zugberechnung zu 
bewältigen und erlaubt es dem Geg¬ 
ner prompt, sich in ein Remis zu ret¬ 
ten. Das so schön programmierte 
Spezialwissen von CYRUS hat jedoch 
einen üblen Haken: In der folgenden 
Stellung kann Schwarz am Zug mit 
Ke8-d8 ganz einfach remis halten: 

— weißer König auf d6 

— weißer Bauer auf e6 

— schwarzer König auf e8 

CYRUS aber zieht hier ohne zu zö¬ 
gern Ke8-f8 und verliert nach Kd6-d7 
die Partie! Schade drum — die norma¬ 
le Zugberechnung hätte sicherlich den 
korrekten Zug ermittelt. Bei Endspiel¬ 
stellungen mit mehreren Bauern ver¬ 
zichtet das Programm auf seine leider 
unausgereiften Spezialkenntnisse und 
erreichte bei weiteren Tests nicht ganz 
die Spielstärke von PSION. Auch die 
schwierige Mattführung mit König. 
Läufer und Springer gegen einen ein¬ 
samen König wird von PSION souve¬ 
rän vorgeführt: CYRUS dagegen 
treibt den König zwar in eine Ecke des 
Schachbretts, weiß aber nicht, daß es 
sich um eine Ecke von der Farbe des 
Läufers handeln muß. Das nicht ganz 
so komplizierte Endspiel mit König 
und zwei Läufern gegen den König 
klappt jedoch einigermaßen. 

Abschließend noch Hinweise für die 
Freunde von Schachproblemen: CY¬ 
RUS bewältigt in den Problemstufen 
maximal ein Matt in sechs, PSION ein 
Matt in acht Zügen. Beide Program¬ 
me beherrschen die Unterverwandlung 
und können bei Bedarf Alternativzü¬ 
ge suchen, was insbesondere für Pro¬ 
blemkomponisten interessant ist. um 
unerwünschte Nebenlösungen zu ent¬ 
decken. Bei PSION ist die Rochade in 
Problemstellungen grundsätzlich nicht 
mehr erlaubt, bei CYRUS kann man 
das einstellen. 

Zusammenfassend läßt sich sagen, daß 
beide Schachprogramme als Lernhil¬ 
fe für Anfänger und als Train ingspart- 
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ner für fortgeschrittene Spieler glei¬ 
chermaßen geeignet sind. Hinsichtlich 
der Spielstärke und Bedienungsfreund¬ 
lichkeit hat PSION ein leichtes Plus zu 
verzeichnen, CYRUS imponiert durch 
seine Farbgrafik und nicht zuletzt 
durch das ausgezeichnete Preis-/Lei- 
stungsverhältnis. Mit etwa 60,— bis 
70, - DM liegt es voll auf der Linie 
von Schneider/Amstrad, nicht nur den 
PC, sondern auch die dazugehörige 
Software preisgünstig anzubieten, 
während man für PSION immerhin 
den dreifachen Betrag berappen muß. 
Zu wünschen bleibt also, daß CYRUS 
noch einmal überarbeitet wird, um ei¬ 
nige Unebenheiten zu glätten; auch ei¬ 
ne deutsche Version würde hierzu¬ 
lande gut ankommen. PSION dagegen 
sollte zu einem Preis angeboten wer¬ 
den, der auch schachbegeisterten 
Schülern und Studenten die (legale) 
Anschaffung erlaubt; über mangeln¬ 
den Umsatz wird sich der Hersteller 
bei der Leistungsfähigkeit des Pro¬ 
gramms sicherlich nicht beklagen 
müssen. 


i_i 




; 

PSI OKI 

CYRUS 

» 


Spielstufen 

! 12 

(1 sec- 4 min) 

15 (1 sec- 3 min) 

; 

j 

- 

Analysestuf e 


Da 

Da 

! 

- 

Autora. Anpassung 


Da 

nein 

f 

- 

Anzeige der Haupt- 




! 


Variante u. Bewertung 

! ja 

(8 Halbzüge) 

ja (5 Halbzüge) 

i 

- 

Eröffnungsbibiiothek 

! 4000 Stellungen 

16000 Züge 

! 

- 

Schachprobleme 

! bis Matt in 8 

bis Matt in 6 

f 

- 

Unterverwandlung 


Da 

Da 

j 

- 

Rochade recht 




; 


einstellbar 


ne l n 

Da 

! 

- 

Alternativzug fordern 


Da 

nur bei Problemen 

| 

- 

Vorwärts/rückwärts 




r 


durch die Partie 


Da 

Da 

! 

- 

Zugvorschlage 


Da 

nein 

! 

- 

Permanent Brain 

! Da, 

abschaltba r 

Da 

i 

- 

Abrufbar e 




! 


Meisterpartien 

! 

50 

nein 

! 

- 

Schachuhr 


Da 

Da 

i 

- 

Uhr stellen 

! nu r 

zurück auf 0 

Da 

; 

- 

Partieunterbrechung 




! 


(Uhren stop) 


Da 

nein 

i 

- 

Demomodus 


Da 

Da 

! 

- 

Brettanzeige 

! 2D/3D schw,-weiJ3 

2D/3D farbig 


- 

Zugeingabe 

! Cursortasten,Maus 

Cursortasten,Maus 






Schachnotation 


- 

Partien auf Disk 






speichern/laden 


Da 

ja 


- 

Ausgabe auf Drucker 


Da 

ja 


- 

Anleitung 

! deutsch/englisch/ 

englisch 




! französisch 



- 

Preis 


ca. 200,- 

ca. 70,- 




Datn l>rnrww Urnern Seft-if; Firtw *ust»r umn s*S 




Quartal 55» 
foartal 75|| 
Quartal m 
Quartal 715« 


Die PC-Databox 4/87 enthält: 

1. BLK-Grafik: komfortables Programm zum Erstellen von 
Vergleichsgrafiken unter BASIC2. 

2 .Drucker: Verändern der Druckereinstellung von DOS- 
Ebene aus. Ready-to-run-Datei mit komplettem 
Assembler-Quelltext. 

3. Yaktzee-PC: Würfelspielprogramm mit vollständiger 
GEM-Ausnutzung für BASIC2. 

4. Listen Printer-Utility für DMP 3000/4000 sowie Epson- 
kompatible. Gibt ASCII-Dateien in NLQ mit beliebiger 
Spaltenbreite aus. 

Senden Sie den Coupon an: 

DMV • Kennwort: PC-Databox • Postfach 250 • 3440 Eschwege 


Auf vielfachen Wunsch unserer Leser ha¬ 
ben wir den beliebten Databox-Service auf 
den PC 1512 erweitert. 

Die monatlich erscheinende Databox bein¬ 
haltet Leserprogramme sowie deren kom¬ 
plette Dokumentation. Hier finden Sie Pro¬ 
gramme unter BASIC2, PASCAL oder lauf¬ 
fähige EXE.-Files. 

Alle Dateien können über ein komfortables 
Shell-Programm angesprochen werden. 


Hiermit bestelle ich.Stck. 5 1/4” -Disketten 

PC-Databox für Schneider PC 1512 
zum Preis von je 24, - DM* 

'(zuzüglich 3.- DM Porto/Verpackung) 

□ Verrechnungsscheck anbei 

□ Lieferung per Nachnahme (zuzüglich der Nachnah¬ 
megebühr, nur innerhalb der BRD) 


Dalum, Unterschrift (bei Minderjährigen des gesetzl Vertreters) 
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Nutzware 



Liebe Joyce-Anwender, nun ist sie da, 
die Rubrik »NUTZWARE« für alle, 
die den Joyce geschäftlich nutzen. Ob 
Sie freiberuflich arbeiten, einen Hand¬ 
werksbetrieb besitzen oder gar einem 
etwas gößeren Unternehmen vorstehen 
- in der »NUTZWARE« finden Sie 
die Informationen, die Sie fiir den pro¬ 
fessionellen Einsatz Ihres Joyce 
brauchen. 

Michael Ebbrecht als verantwortlicher 
Redakteur und ich als Wirtschaftsbe¬ 
rater für Struktur- und Organisations¬ 
fragen kleiner Unternehmen werden 
uns bemühen, Ihnen Orientierungshil¬ 
fen im Softwarelabyrinth für den Jo¬ 
yce zu geben. 

Erfreulicherweise steht Ihnen heute, 
ca 1 1/2 Jahre nach der Einführung des 
Joyce, eine Fülle von Geschäftspro¬ 
grammen für die unterschiedlichsten 
Anwendungen zur Verfügung. Mit der 
Rubrik «NUTZWARE« wollen wir Ih¬ 
nen Tips und Hilfen beim Software¬ 
kauf und bei der Anwendung der 
gekauften Programme geben. Selbst¬ 
verständlich werden wir Sie über alle 
Neuigkeiten informieren, die im Zu¬ 
sammenhang mit dem Joyce und sei¬ 
nem Einsatz als Personal-Computer 
stehen. 

Wir können Ihnen natürlich nicht die 
Entscheidung beim Kauf eines Pro¬ 
gramms abnehmen, doch haben wir 
den Ehrgeiz, Ihnen im Rahmen der 
«NUTZWARE« die Informationen zu 
vermitteln, die Sie benötigen, um bei 
Ihrem Händler die richtigen Fragen 
stellen zu können. Denn viele Ge- 
schäftsprog ramme erfordern Spezial - 
wissen über organisatorische Abläufe 
und Struktur eines Unternehmens. 
Nicht zuletzt aus diesem Grunde sind 
die Händler oft überfordert, wenn es 
gilt, Ihnen aus der Fülle des Angebo¬ 
tes die richtige Software für Ihr Un¬ 
ternehmen herauszusuchen. 

Gleichzeitig soll die »NUTZWARE« 
als Forum für interessierte Anwender 
von Geschäftsprogrammen dienen. 
Deshalb möchte ich das Gespräch mit 


Anwendern, Händlern und Herstellern 
von Geschäftsprogrammen suchen und 
denke, daß die »NUTZWARE« auch 
eine Funktion als Schnittstelle zwi¬ 
schen Verbrauchern und Herstellern 
erfüllen kann. 

Nach der Einführung des PC 1512 sah 
es zwar eine Weile so aus, als wäre 
der Joyce aus dem Rennen, doch nach 
den letzten guten Nachrichten aus 
Türkheim ist zu erwarten, daß der Joy¬ 
ce nach wie vor eine Alternative zu an¬ 
deren Maschinen ist und auch von 
Schneider noch eine gute Weile ge¬ 
pflegt werden wird. 

Das dürfte auch für die Marketingstra¬ 
tegen der Softwarehäuser ein Signal 
dafür sein, daß der Softwaremarkt in 
Sachen Joyce noch offen und emp¬ 
fänglich für gute Anwenderprogram¬ 
me ist. 

Wir dürfen also erwarten, daß uns in 
naher Zukunft noch einige gute Ge¬ 
schäftsprogramme für den Joyce be¬ 
schert werden. 


Oft läßt sich beobachten, daß Pro¬ 
gramme kaum mehr gepflegt werden, 
wenn sie einmal auf dem Markt sind. 
Zu wünschen ist hier, daß die Softwa¬ 
rehäuser mit einer wesentlich gößeren 
Flexibilität, als dies bislang der Fall 
war, auf Kritik und Anregungen zu ih¬ 
ren Produkten reagieren werden. 

Sie werden in der »NUTZWARE« 
noch oft Kommentare zur Dreiecks¬ 
beziehung Anwender - Händler - 
Softwarehaus lesen können. Ich wün¬ 
sche mir im Rahmen der »NUTZWA¬ 
RE« einen regen Austausch mit all 
jenen, die etwas mit der professionel¬ 
len Nutzung des Joyce zu tun haben 
- seien es nun Anwender, Händler 
oder Softwarehäuser. 

Darüber hinaus sind wir offen für An¬ 
regungen, Meinungen und Kritik zu 
Inhalt und Form der »NUTZWARE«. 

(W.Huske) 
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98,00 

STAR Base 

198,00 

Business STAR 

298,00 

Fibu-STAR Plus 

298,00 

Kontenblätter (1000 st Endi) 

49,90 


STAR-Mail 98,00 
Datei-ST AR 98,00 
als Joyce-Mailing- 

rr 189.00 


Leerdisketten MAXELL CF-2 


lost. 


79,50 


STAR-Writer I 198,00(0) 
Datei-STAR 98,00 (D) 
59,90 (K) 
Statistik-STAR 79,90 (D) 


Copy-STAR II 29,90 (K) 
39,90 (D) 
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Creator-STAR 49,90 (D) 


STAR-Mon 
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CPC-Writer 
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Zauberstab 39,90 (D) p y ramide 39,90 (D) Puzzle 39,90 (D) Games 

Panasonic Matrix- u. Typenraddrucker 
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Druckerständer (ca. 30 x 40 cm) 29,90 


PVC-Abdeckhauben 


NEU! NEU! 


faltbar für 
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13,95 
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Schneider-Geräte (Drucker, Monitore, Computer,Tastaturen etc.) 22,95 


maßgeschneidert, 
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f. 50 3"-Disks 
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SPIELE / Software 
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1 softwareunterstützt 

139,00 

E 
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Wir bieten auch Finanzierungen an. Bitte fordern Sie die Unterlagen mit dem entsprechenden Coupon an. Beispiel: 36 Mon. Laufzeit = 
effekt. Zinss. 15,4 % p. a. 


SF 12 

O Ja. ich interessiere mich für Ihr Finanzierungsangebot. 
Bitte senden Sie die erforderlichen Unterlagen an 


Rückporto ist beigelegt (1,30 DM/Briefmarken) 
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»Russisches Roulette 
beim Software kauf« 


Während Schneider die Werbung für 
den Joyce immer noch so gestaltet, 
als wäre dieser vielseitige Computer 
nichts anderes als eine bessere 
Schreibmaschine, haben viele kleine 
Unternehmer die Fähigkeiten dieser 
Maschine längst für sich entdeckt 
und nutzen den Joyce wie einen 
Personal-Computer. Viele Software¬ 
häuser - vor allem die kleinen - ha¬ 
ben die Möglichkeiten des Joyce als 
billigen Personal-Computer früh er¬ 
kannt und entsprechende Programme 
für gewerbliche Anwender entwickelt 
und auf den Markt gebracht. 

Das Angebot von kommerziellen Pro¬ 
grammen für den Joyce ist riesig, das 
Angebot reicht von der Lagerverwal¬ 
tung über Tabellenkalkulation, Auf¬ 
tragsbearbeitung und Fakturierung bis 
hin zur ausgefciltesten Finanzbuchhal¬ 
tung sowie branchenspezifischen Soft¬ 
warepaketen. Man sollte meinen, hier 
blieben keine Wünsche offen. 

Und doch hat diese im Grunde erfreu¬ 
liche Entwicklung zu einem Mißstand 


geführt, der mittelfristig in der Lage 
ist, die durch den Schneider-PC oh¬ 
nehin schon gefährdete Karriere des 
Joyce als preiswerte Alternative vor¬ 
zeitig zu beenden. 

Der gewerbliche Anwender sieht sich 
heute einer derartigen Fülle von kom¬ 
merzieller Software gegenüber, daß er 
nicht oder kaum noch in der Lage ist, 
auf Anhieb die für ihn richtigen Pro¬ 
gramme zu erkennen. Die Treffer¬ 
quote beim Softwarekauf ist natürlich 
größer als beim russischen Roulette. 
Trotzdem kann ich Anwender verste¬ 
hen, die da Parallelen ziehen. 

In meiner Praxis als Wirtschaftsbera¬ 
ter sind mir Klienten begegnet, die ge¬ 
rade das dritte Finanzbuchhaltungs¬ 
programm gekauft hatten und hofften, 
daß dieses nun endlich so laufen wer¬ 
de, wie sie es schon vom ersten erwar¬ 
tet hatten. 

Wer sich für seinen Computer ein 
Spiel kauft und zu Hause dann fest¬ 
stellt, daß dieses Spiel seinen Ansprü¬ 
chen nicht genügt, wird sich ärgern, 


die Diskette mit dem Spiel zur Seite 
packen und die Angelegenheit wahr¬ 
scheinlich bald vergessen haben. 
Wenn Sie sich für Ihr Geschäft dazu 
durchgerungen haben, mit dem Joy¬ 
ce nicht mehr nur Briefe zu schreiben, 
sondern z.B. auch Ihre Buchhaltung 
einzurichten, kostet Sie ein entspre¬ 
chendes Programm erst einmal un¬ 
gleich mehr als ein Computerspiel. 
Wenn Sie dann nach nächtelanger Ar¬ 
beit mit diesem Programm feststellen 
müssen, daß es für Ihre Zwecke gänz¬ 
lich ungeeignet ist, finden Sie dies 
nicht nur ärgerlich, sondern auch 
gleich doppelt teuer. Schließlich ver¬ 
dienen Sie Ihr Geld nicht damit, Pro¬ 
gramme auszuprobieren. 

Sie werden sich nun erstens fragen, 
wer an Ihrem Mißerfolg, dem Joyce 
eine ordentliche Buchführung beizu¬ 
bringen, schuld ist und zweitens, wie 
Sie in Zukunft derartige Fehlschläge 
vermeiden können. 

Die Ursachen eines falschen Softwa¬ 
rekaufs sind vielschichtig und so rich¬ 
tig »schuld« daran ist niemand. 
Beteiligt am Softwarekauf sind drei 
Parteien: Sie selbst als Suchender in 
Sachen Geschäftssoft wäre, Ihr Händ¬ 
ler und der Hersteller der Software. 
Letzterer ist zwar nicht direkt anwe¬ 
send, spielt jedoch trotzdem eine wich¬ 
tige Rolle. 

Jede der drei beteiligten Personen hat 
bestimmte Interessen an dem sich an¬ 
bahnenden Geschäft. Sie selbst möch¬ 
ten — bleiben wir beim genannten 
Beispiel - zu einem angemessenen 
Preis ein leistungsfähiges Finanzbuch¬ 
haltungsprogramm erstehen. Da Sie 
Kaufmann und nicht unbedingt gleich¬ 
zeitig auch Computerfachmann sind, 
möchten Sie auch ausführlich über Fi¬ 
nanzbuchhaltungsprogramme für den 
Joyce beraten werden. 

Der Händler kennt Ihre Interessen und 
möchte Ihnen selbstverständlich auch 
gern ein solches Programm verkaufen. 
Doch in den meisten Fällen ist er da¬ 
zu nicht in der Lage, da er wahrschein¬ 
lich nur zwei verschiedene Program¬ 
me auf Lager hat. Er weiß zwar, daß 
es wesentlich mehr Software gibt, 
doch das gesamte Angebot kennt er 
bestenfalls aus Reviews in einschlägi¬ 
gen Zeitschriften . 
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Die Frage, warum das Angebot des 
einzelnen Händlers so gering ist, läßt 
sich leicht beantworten: Anwender¬ 
software kostet in der Regel mehrere 
hundert Mark. Bei immer kleiner wer¬ 
denden Handelsspannen werden nur 
wenige Händler das Risiko eingehen, 
sich mehrere Programme des gleichen 
Anwendungsbereiches einzukaufen 
und dann unter Umständen auf der 
Ware sitzen zu bleiben. Andererseits 
ist mir kein Softwarehersteller be¬ 
kannt, der dem Händler erst einmal 
zumindest ein Exemplar seines Pro¬ 
gramms auf Kommission zur Verfü¬ 
gung stellt. So kommt es, daß viele 
Händler über neue Anwenderpro¬ 
gramme oft nicht oder nur unzurei¬ 
chend informiert sind; vorrätig haben 
sie es dann natürlich erst recht nicht. 
Der Hersteller oder Distributor einer 
Software will sein Programm natürlich 
lieber sofort gegen Rechnung verkau¬ 
fen, als langwierige Kommissionsge¬ 
schäfte zu tätigen. Dazu kommt die 
Befürchtung, daß er beim Kommis¬ 
sionsgeschäft noch nicht einmal den 
Erlös für ein Exemplar seines Pro¬ 
gramms bekommt, wenn dieses uner¬ 
laubt kopiert und dann als nicht 
verkäuflich wieder zurückgeschickt 
wird. 

Das Ergebnis dieser Interessenkolli¬ 
sion ist für alle Beteiligten gleicher¬ 
maßen unbefriedigend. Sie, der 
Verbraucher, bekommen nicht die Be¬ 
ratung, die Sie sich beim Softwarekauf 
wünschen. Dadurch ist die Chance 


sehr groß, erst einmal etwas Falsches 
zu kaufen. Ihr Händler ist nicht zufrie¬ 
den, denn er hat nicht nur keine 
Marktübersicht, sondern bekommt 
nun auch noch Ärger mit Ihnen, weil 
er Ihnen ein falsches, schlechtes oder 
einfach nur für Ihre Zwecke ungeei¬ 
gnetes Programm verkauft hat. 

Der Hersteller von Geschäftsprogram¬ 
men ist natürlich auch nicht zufrieden, 
denn sein Absatz ist aus den eben be¬ 
schriebenen Gründen ziemlich 
schleppend. 

Wie löst man nun den Knoten? Wel¬ 
che Möglichkeiten haben Sie als Ver¬ 
braucher und wir als verbrauchemahe 
Zeitschrift, die Situation zu ver¬ 
bessern? 

Wir werden uns — speziell im Rah¬ 
men der NUTZWARE — stets bemü¬ 
hen, einen Überblick über die auf dem 
Markt befindlichen Geschäftspro¬ 
gramme zu vermitteln. Wir werden 
die Hersteller von Geschäftsprogram¬ 
men bitten, uns Neuheiten zum Test 
zu überlassen, wir werden Sie regel¬ 
mäßig über den Softwaremarkt infor¬ 
mieren und in naher Zukunft 
Geschäftsprogrammen testen und mit¬ 
einander vergleichen. 

Selbstverständlich freuen wir uns auch 
auf Ihre Mithilfe. In einer der näch¬ 
sten Ausgaben wollen wir eine Frage¬ 
bogenaktion starten, die sich speziell 
mit dem Joyce und Geschäftsprogram¬ 
men für den Joyce beschäftigt. 

(W. Huske) 


LocoScript 1.41 
und 

LocoMail 

mehr Komfort für 
Joyce? 

Endlich hat auch Schneider eingese¬ 
hen, daß zu den Standards einer gu¬ 
ten Textverarbeitung sowohl eine 
integrierte Serienbrieffunktion, als 
auch eine Rechenfunktion im Text ge¬ 
hören. In Großbritannien ist die eng¬ 
lische Version schon eine Weile auf 
dem Markt, nunmehr soll auch eine 
deutsche Version des guten alten Lo¬ 
coScript erscheinen. 

In der Version 1.41 enthält Loco¬ 
Script das Programm LocoMail, mit 
dessen Hilfe Sie Serienbriefe erstellen 
und Standardformulare entwerfen kön¬ 
nen. LocoMail kann sogar rechnen, 
wenn auch die Rechenoperationen nur 
begrenzt und leider nicht einfach im 
Text aufzurufen sind. Bei anderen pro¬ 
fessionellen Textsystemen ist dies 
schon seit einiger Zeit Standard. 

Da mich die Vorabversion erst kurz 
vor Redaktionsschluß erreichte, gibt 
es in dieser Ausgabe nur einen klei¬ 
nen Abriß über die Möglichkeiten, die 
LocoMail bietet. 


DIE JOYCE-DATABOX 
SOFTWARE FÜR DEN SUPER RECHNER 


Jetzt gibt’s die Databox-DIsk auch für den Joyce und außerdem als praktisches Databox-Abo. 


Alle Joyce-Programme aus dem Heft finden Sie »ready 
to run« auf unserer praktischen Databox. Zusätzlich ent¬ 
hält die Joyce-Databox noch Bonus-Programme. 

Diesen Monat: Vokabeltrainer 


Als Diskette für 1 Jahr (12 Lieferungen): 


Im Inland und West-Berlin.300,- DM 

Im europäischen Ausland.320,- DM 

Im außereuropäischen Ausland. 360,- DM 


Einzelbezug: 

Einzelbezugspreis für DATABOX: 

Diskette 3’’ 24,- DM zzgl. 3,- DM Porto/Verp. 
(im Ausland zzgl. 5,- DM Porto/Verpackung). 

Das Databox-Abo kostet: 

Als Diskette für 1/2 Jahr (6 Lieferungen): 


Im Inland und West-Berlin.150,- DM 

Im europäischen Ausland.160,- DM 

Im außereuropäischen Ausland.180,- DM 


In den vorgenannten Preisen sind die Versand- und Ver¬ 
packungskosten enthalten. 

Bitte benutzen Sie für Ihre Bestellung die Abo-Karte. 

Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungsscheck) 
oder als Nachnahme zuzüglich der Nachnahmegebühr. 

(In das Ausland ist Nachnahme nicht möglich). 


Bitte Bestellkarte benutzen! DMV Verlag — Fuldaer Str. 6 — 3440 Eschwege 


Inhalt der Joyce-Databox 4/87: 


CAD unter GSX — Joyce-Uhr — Checksummer 
BONUS: Vokabeltrainer 
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Beim Durchblättem des recht umfang¬ 
reichen Handbuches zu LocoMail fiel 
mir erst einmal positiv auf, daß sich 
die Übersetzerin des Handbuches ver¬ 
mutlich auch mit seinen Inhalten aus¬ 
einandergesetzt hat. 

Auch die Verfasser des Textes haben 
sich redliche Mühe gegeben, das Wis¬ 
sen um den Umgang mit LocoMail 
halbwegs strukturiert und in kleinen 
und leicht verdaulichen Häppchen zu 
vermitteln. 

Es gibt anschaulichere Handbücher, 
doch für Kenner anderer Amstrad- 
Produkte ist es die reine Wonne, das 
LocoMail-Handbuch zu lesen und da¬ 
mit zu arbeiten. 

Wenn Ihnen das Arbeiten mit Loco- 
Script ein wenig vertraut ist, sind Sie 
anhand der etwa 35-seitigen Einfüh¬ 
rung in LocoMail innerhalb einer 
Stunde in der Lage, einen von Ihnen 
geschriebenen Serienbrief mit einer 
von Ihnen erstellten Adressdatei zu 
mischen und auszudrucken. 

Ganz nebenbei haben Sie dann auch 
gelernt, wie Sie sich einen Standard¬ 
text erstellen können, den Sie bei Be¬ 
darf dann mit geringfügigen Ände¬ 
rungen wie Datum, Zahlen- oder 
Wertangaben oder anderen Variablen 
immer wieder verwenden können. 

Im zweiten Teil des Handbuches wird 
es dann ein wenig komplizierter. Das 
Handbuch beschäftigt sich zwar auch 
hier lediglich mit dem Entwerfen ei¬ 
nes Formtextes sowie dem Erstellen 
und Pflegen einer Daten/Adressdatei, 
doch sind die Angaben und Hinweise 
hier wesentlich detaillierter. Sie wer¬ 
den mit Sicherheit mehrere Versuche 
starten müssen, bis Ihnen der Bild¬ 
schirm das gewünschte Ergebnis zeigt. 

Wenn man dem Handbuch Glauben 
schenken darf, können Sie auch Da¬ 
tendateien in Ihre Standardtexte ein¬ 
fließen lassen, die nicht mit LocoScript 
erstellt wurden. LocoMail ist also in 
der Lage, Daten aus ASCII-Dateien zu 
verarbeiten, die sie z.B. mit Ihrem 
Auftragsbearbeitungsprogramm er¬ 


stellt haben. Dies erfordert jedoch 
mehr Aufwand, als eben einmal so ins 
Handbuch zu schauen und eine Stun¬ 
de später einen Rundbrief auf die Rei¬ 
se schicken zu können. 

Bevor Sie sich mit Teil III des Hand¬ 
buches beschäftigen, sollten Sie sich 
Ihre hoffentlich vorhandenen Pro¬ 
grammierkenntnisse ins Gedächtnis 
zurückrufen. In Teil III wird es zwar 
sehr interessant, doch leider auch zu 
kompliziert für einen »Nur An¬ 
wender«. 

Die Möglichkeiten von LocoMail, die 
hier in Teil III erklärt werden, sind 
vielfältig und verlockend. Sie können 
das Programm an weisen, z.B. nur be¬ 
stimmte Adressen einer Daten/Adress¬ 
datei zu verwenden. 

Sie haben die Möglichkeit, Teile ei¬ 
nes Standardtextes nur unter bestimm¬ 
ten Bedingungen zu verwenden und 
ansonsten auszulassen. 

Die Möglichkeiten der Verknüpfung 
zwischen Daten-/Adressdatei und 
Formtext bzw. — je nach Aufgaben¬ 
stellung — bestimmten Teilen des 
Formtextes mittels LocoMail- 
Anweisungen erscheinen schier uner¬ 
schöpflich. 

Besonders gut hat mir die Möglichkeit 
gefallen, daß LocoMail numerierte 
Absätze mit neuen Nummern versieht, 
wenn einer dieser Absätze aufgrund 
einer Verknüpfungsbedingung nicht 
ausgedruckt wird. 

Sie können mit LocoMail-Anweisun- 
gen auch »selbstrechnende« Formulare 
und Rechnungen erstellen, müssen 
sich jedoch darüber klar sein, daß sich 
das nur dann lohnt, wenn Sie einige 
hundert Rechnungen bewältigen 
müssen. 

Bei kleineren Mengen würde ich Ih¬ 
nen empfehlen, die Finger von »selb¬ 
strechnenden« Formularen zu lasssen 
und zum Abacus oder Ihrem Taschen¬ 
rechner zu greifen. Das ist zwar we¬ 
niger »professionell« und elegant, 
erspart Ihnen jedoch viel Zeit und aus- 
geraufte Haare. 


Der Wermutstropfen bei der Arbeit 
mit LocoMail besteht leider darin, daß 
alle Selektions- und Verknüpfungs¬ 
möglichkeiten nur per LocoMail-An- 
weisungen im Text angesprochen wer¬ 
den. Dieses Verfahren mag zwar not¬ 
wendig sein, führt jedoch zu einer 
vollkommen unübersichtlichen Text¬ 
gestaltung. 

Wenn Sie wirklich alle Möglichkeiten 
von LocoMail ausschöpfen wollen, 
benötigen Sie viel Zeit und einige 
Grundkenntnisse im Programmieren. 
Verfügen Sie über beides, werden Sie 
begeistert von den vielfältigen Mög¬ 
lichkeiten sein, die dieses Programm 
Ihnen bietet. 

Zusammenfassend läßt sich feststellen, 
daß LocoMail eine willkommene und 
schon seit langem fällige Erweiterung 
von LocoScript ist. 

Anwender, die Rundschreiben an 
Kunden, Freunde, Vereinsmitglieder 
etc. versenden möchten, sind damit 
bestens bedient und innerhalb kürze¬ 
ster Zeit in der Lage, mit den dazu not¬ 
wendigen Anweisungen von LocoMail 
zu arbeiten. 

Die vielfältigen anderen Funktionen - 
so sehr sie auch zur Anwendung rei¬ 
zen mögen — sind aufgrund der recht 
komplizierten Handhabung nicht ge¬ 
eignet, die alltägliche Büroarbeit zu er¬ 
leichtern. 

LocoMail wird ab sofort über die 
Schneider-Fachhändler zum Preis von 
DM 128,— erhältlich sein. 

Auch die neuerworbenen PC Ws wer¬ 
den nicht mit LocoMail ausgeliefert; 
der Interessent ist also in jedem Falle 
auf den separaten Erwerb angewiesen. 

Wir werden in den nächsten Ausga¬ 
ben sicher noch näher auf LocoMail 
eingehen. Bei entsprechend großem 
Interesse sollte es auch möglich sein, 
an dieser Stelle ein Tutorial für die 
gängigsten Anwendungen von Loco¬ 
Mail zu veröffentlichen. 

(W.Huske) 
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Software-Schnell-Versand 


Schneider CPC 


lOth Frame 

29 .90 

39.90 

1942 

29.90 

39 90 

ACE 

29 90 

39 90 

Acro Jet 

29.90 

— .— 

Aliens 

29 .90 

39 90 

Americas Cup 

29 90 

39 90 

Annals of Rome 

39 .90 

46 90 

Antiriad deutsch 

29 .90 

39 90 

Avenaer 

Bally Hoo 

29 .90 

39 90 


69 90 

Batman 

29 .90 

39 90 

Bobby Bear Ing 

34 .90 

46.90 

Bomb Jack II 

29.90 

39 90 

Bouldsr Da sh 

29.90 

— 

Boulder Dash III 

29 .90 

— .— 

Bounder 

29.90 

39 SO 

Breaktru 

29 .90 

39.90 

Camelot Warriors 

29.90 

39.90 

Cityslicker 

29.90 

39.90 

CLONE 

— .— 

68.90 

Colossus Chess 4.0 

36 .90 

47 .90 

Crafton & Xunk 

33.90 

47.90 

Cyrus II Schach 

33 .90 

47.90 

Dan Dare 

29.90 

39.90 

Dandy 

29.90 

39.90 

Deactivators 

29.90 

47 .90 

Deep Slriks 

29.90 


Defcom 

29.90 


Die Erbschaft 

47 .90 

59.00 

Donksy Kong 

29.90 

39.90 

Dragons Lair 

29.90 

39.90 

Druid 

29.90 

39.90 

Eagles Nest 

29.90 

39 90 

Eden Blues 

33.90 

47 .90 

Elevator Actlon 

29.90 

39.90 

Elite englisch 

58 .00 

69 90 

Elite Hit Pak 

29.90 

39,90 

Enchanter 

— .— 

69.90 

Explorer 

29.90 

39 .90 

Fairlight 

35.90 

47 .90 

Fighter Pilot 

29 .90 

39.90 

Firelord 

— .— 

39.90 

Five Star Games 

29.90 

39 90 

Frankie 

29 .90 


Frost Byte 

29 .90 


Futurs Knight 

29 .90 

39 .90 

Galvan 

29.90 

39 90 

Gauntlet 

29 .90 

39.90 

Ghost'n'Goblins 

29.90 

39.90 

Gladiator 

29.90 

47.90 




■ 



Schn&idor- 

PC 


Alter Ego 

79.00 


Arcade Classics 

79.00 


Borrowed Time 

69.00 


Bruce Lee 

69.00 


Chessmaster 2000 

79.00 


Cyrus 1) Schach 

79.00 


DBase II 2.43 

379.00 


Empire 

89.00 


Fl5 Strike Eagle 

69.00 


Reet Street Editor 

398.00 


Right Simulator II 

159.00 


Jet 

159.00 


Leather Goddesses 

89.00 


Mean 16 Golf 

69.00 


Mindshadow 

59.00 


Moonmist 

89.00 


Multiplan 

279.00 


Ninja Mission 

39.00 


Pitstop II 

69.00 


Printmaster 

139.00 


Pro Golf 

39.00 


Protext 

179.00 


Rogue 

59.00 


Shanghai 

59.00 


Silent Service 

79.00 


Strip Poker 

59.00 


Summer Games II 

69.00 


Super Sunday 

69.00 


Tass Times in Tonedown 69.00 


Ultima III 

69.00 


Winter Games 

69.00 


Wordstar 3.1 

379.00 


World Tour Golf 

59.00 





~OLsc POlaaTä 

DAS Kopermodul <ür alle CPC. Der DiscWizard wird 
•infach hintan auf den Rechner gesteckt - Ein kleiner 
Knopfdruck genügt - schon wird das aktuelle Programm 
auf Diskette gesichert. Etwa 80X der mit DiscWizard 
kopierten Programme laufen auch ohne angeschlossenes 
Modul, d.h. der DiscWizard muß nicht ständig am Gerät 
verbleiben, sondern kann nach dem Kopieren abgezogen 
werden ! 

DM 14-9,- Adapter für 6128 DM 39,- 


PAR F1VE GOLF 

Eine realitätsnahe Golfsimulation 
der Spitzenklasse. Spielablauf in 
3D und Draufsicht. Eingebauter 
Platzeditor. Wettkampfmodi für 
bis zu 7 Spielern. Komplett mit 
2 Golfplätzen und ausführlicher 
deutscher Dokumentation. 


464/664/6128 Disc 
464 Kassette 


68.90 

47.90 


Schneider CPC 


Glass 

29.90 

39 90 

Glider Rider 

29 .90 

39 90 

Hacker II 

29.90 

39 90 

Heartland 

29 .90 

39 90 

HexenkUche 

29 .90 

— — 

Hexenküche II 

29 .90 

— — 

Hijack 

29 .90 

39 .90 

Ikari Warrior 

29 .90 

39.90 

Impossaball 

29.90 

39 90 

Impossible Mission 

34.90 

45 90 

Infidel 

— .— 

69.90 

Infiltrator 

29.90 

39.90 

Infodroid 

29.90 

39 90 

International Karate 

29.90 

39 90 

Jack the Nippar 

29.90 

39.90 

Jailbreak 

29.90 

39.90 

Jeweis of Darkness 

59 .00 

69 00 

Knight Games 

29.90 

47 .90 

Konamis Coin Up Hits 

29.90 

39 90 

Konamis Golf 

29.90 

39 .90 

Koronis Rift 

— .— 

59 .00 

Kung Fu Master 

29.90 

39 90 

Legend of Kagas 

— .— 

39.90 

Light Force 

29.90 

39.90 

Magic Brush 

47 .90 

68.90 

Mandragore 

47 90 

59.00 

Marble Madnsss 

29.90 

39 90 

Meltdown 

29 .90 

47 .90 

Msrmaid Madnsss 

29.90 

47 .90 

Miami Vice 

29.90 

39 .90 

Mission Elevator 

29 .90 

47 .90 

Moon Cresta 

29 90 

— .— 

Movie 

29 .90 

39^90 

Nodes of Yesod 

36 .90 

59 00 

OAX 

47 .90 

68 90 

One 

29 .90 

39,90 

Pacific 

29.90 

39 90 

Palitron 


47 90 

Par Fivs Golf 

47 .90 

68.90 

Planelfall 

— .— 

69.90 

Pro Tennis 

29 .90 

39 90 

Prodigy 

29 .90 

39 90 

Rescue on Fractalus 

29 90 

47 SO 

Rogue Trooper 

29.90 

— 

Room Ten 

29.90 

39 .90 

Saboteur 

29.90 

39 90 

SAI Combat 

29.90 

39 90 

Samantha Fox Poker 

29.90 

39 90 

Scooby Doo 

29.90 

39.90 

Sea Stalker 


69 .90 


Schneider CPC 


Sepulcri 
Shogun 
Short Circuit 
Silent Service 
Silicon Dreams 
Soccer '86 
Sorcarer 
Sorcery+ 

Space Harrier 

Space Invasion 

Space Shuttle 

Spellbreaker 

Star Trek 

Starglider 

Strangeloop 

Street Hawk 

Street Machine 

Swords and Sorcery 

Tapper 

Tarzan 

Tau Ceti 

Tempest 

The Eidolon 

The fifth Axis 

The Goonies 

The great Escape 

The Music System 

The Pawn 

They sold a million 

They sold a million II 

They sold a million III 

They stole a million 

Thing on a spring 

Toaa Runner 

Tomahawk 

Top Gun 

Trivial Pursuit deutsch 
Tu|ad 

Turbo Esprit 
Way of Tiger 
Werner mach hin 
Who dares wms II 
Winter Games 
Wishbnnger 
Xarq 
Xevious 

Yie ar Kung Fu II 
Zoids 


39 .90 

59.00 

29 .90 

39.90 

29.90 

39.90 

29.90 

39.90 

59 .00 

69.00 

29 .00 

— 

— .— 

69 .90 


47.90 

29.90 

39.90 

29.90 

39.90 

29 .90 

47.90 


69 90 

29 90 

47 .90 

39 .90 

69 00 

29.90 

39 90 

29 90 

— .— 

29.90 

39.90 


47.90 

29.90 

~ _— 

29.90 

39.90 

29.90 

29.95 

29.90 

39 90 

29 90 

39.90 

29 90 

47 .90 

29 90 


29.90 

39.90 

59.00 

69 00 


64.90 

34.90 

39.90 

34.90 

39.90 

34.90 

39 .90 

29.90 

47.90 

29.90 

— .— 


49 .90 

34.90 

46 .90 

29.90 

39.90 

39.00 

59.00 


47.90 

29.90 

39 .90 

29.90 

47 .90 

29 90 

45.90 

29 90 

39.90 

34 90 

45 90 


69.90 

34.90 

47 .90 

29.90 

39 90 

29 90 

39 90 

29 90 

39 90 


Joyce F’C'JV 

Annals of Rome 

69.90 

Ballyhoo 

69,90 

Batman 

44.90 

Bounder 

39.90 

Classic Collection 

39.90 

Colossus Chess 5,0 

47.90 

Cyrus 11 Schach 

49.90 

DBase II 

189.00 

DR Draw 

189.00 

DR Graph 

189.00 

Enchanter 

69.90 

Infidel 

69.90 

Jewels of Darkness 

79.00 

MS Basic 

189.00 

Multiplan 

189.00 

Planetfall 

69.90 

Seastalker 

69.90 

Soreerer 

69.90 

Spellbreaker 

69.90 

Strike Force Harrier 

54.90 

Tau Ceti 

59.90 

The Pawn 

69.90 

Tomahawk 

69.90 

Turbo Pascal 3.0 

219.00 

Turbo Toolbox 

219.00 

WishbringBr 

69.90 

Wordstar 3.0 

189.00 


Ladenverkauf: 

Sound & Zubehör 
Bahnhofstraße 10 
2870 Delmenhorst 


Postversand: 

Waldeck-Software 
Tulpenstraße 30 
2870 Delmenhorst 


Waldeck-Software 2870 Delmenhorst 
Tulpenstraße 30 Tel.: 04221/1 6464 
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Ihnen folgende Funktionen zur Ver¬ 
fügung: 

1. Neue Datei erstellen 

Hier kann nur ein noch nicht auf der 
Diskette vorhandener Dateiname ein¬ 
gegeben werden. 

2. Alte Datei bearbeiten 

Eine Datei der Gruppe .DAT kann 
aufgerufen werden; sicherheitshalber 
wird von dieser Datei eine Kopie 
(.BAK) erzeugt. 

3. Datei löschen 

Hier muß auch die Extension mit an¬ 
gegeben werden. 

4. Datei umbenennen oder zurück¬ 
holen 

5. Datei drucken 

Einsprung in das Druckermenue, wo 
einige Einstellungen zum Ausdruck 


Seitengestaltungs- 
CAD-Programm 
für PCW 8256/8512 

Dieses Programm ermöglicht es, Gra¬ 
fiken aller Art und Texte in verschie¬ 
denen Schrifthöhen am Bildschirm zu 
erstellen und anschließend auszu¬ 
drucken. Ein Grafikbildschirm ent¬ 
spricht beim anschließenden Ausdmck 
genau einem DIN A4-Format. Es kann 
mit einer Genauigkeit von 0,1 mm ge¬ 
zeichnet werden; natürlich kann der 
Drucker durch die Strichstärke diese 
Genauigkeit nicht realisieren, eine Ge¬ 
nauigkeit im Millimeterbereich ist 
jedoch durchaus möglich. Die Schritt¬ 
weiten des Grafikcursors sind von 1 
cm — 0,1 mm einstellbar. 

Bevor mit der Arbeit begonnen wer¬ 
den kann, muß eine Arbeitsdiskette er¬ 
stellt werden. Diese sollte folgende 
Dateien enthalten: 

- Ihre Version der .EMS-Datei 

- ASS1GN.SYS 

- GSX.SYS 

- DDFXHR8.PRL 

- DDFXLR8.PRL 

- BASIC.COM (mit GSX-Treiber, 
siehe Handbuch) 

- CAD.BAS 

Jetzt können Sie das Programm mit 
A> BASIC CAD 

starten. Das Hauptmenue (Bild 2) stellt 



H=7mm H—5.5mm H=4.5mm 


H=3mm 


Bildl: Ein Demoausdruck einer CAD erstellten DIN A4-Seite. 
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Professional Computing—i 


SeitengestaltungsprogranN Version 1,0 3 1986 von Jörg Buckert 

Dateien auf dieser Diskette: 

PROBE .DA! 

BAK-Dateien auf dieser Diskette: 

Keine Datei vorhanden 


Es stehen nun folgende Punkte zur Auswahl: 

1 = neue Datei erstellen 

2 = alte Datei bearbeiten 

3 = Datei löschen 

4 = Datei tmbniennen, oder zurückholen 

5 5 Datei drucken 

$ = zurück zu« Syste* 


Wähle ? 


X-loordin»te= 17.»«, V-Xwr<linit«= 7.»oi 


O C ) 

11=7* H=S.Sm H=4.5* 

R=3m H=1m 


L = Lin 

»:W 


'"is 

lfeld 


C * Rechteck 

X = Kreise 
I = Text 

ex 

H = Buchst.Kühe 

U = Resnelww 

S = Hüter 
S = Cursorschritt 
l - Ende 


Befehl ? 


Bild 2: Das Hauptmenue von Joyce-CAD 


Bild 3: Das Grafikmenue bietet unfangreiche Funktionen 


der angewählten Datei vorgenommen 
werden können. 

6. Zurück zum System 
Sprung in CP/M mit Sicherheits¬ 
abfrage 

Die Menuepunkte 1 und 2 verzweigen 
in das Grafikmenue (Bild 3); der Gra¬ 
fikbildschirm ist hier in drei Teile auf¬ 
geteilt: 

1. Die Menuespalte, welche alle zur 
Verfügung stehenden Befehle auflistet. 

2. Die Befehlszeile, in der die Anwei¬ 
sungen an das Programm entgegenge¬ 
nommen werden. 

3. Die Grafikfläche, die einer DIN 
A4-Seite auf dem Drucker entspricht. 
Hier befindet sich auch der Grafikcur¬ 
sor (Fadenkreuz), welcher mit den 
Cursortasten bewegt werden kann. Die 
aktuelle Position des Cursors wird, 
von der linken oberen Blattecke aus¬ 
gehend, in cm bzw. cm-Bruchteilen in 
der Kopfzeile angegeben. 


Grafikmenue 


1. Linien zeichnen (L) 

Cursor an den Anfang der Linie pla- 
. zieren, (L) drücken und mit dem Cur¬ 
sor an den zweiten Punkt fahren, (+) 
drücken, nächsten Punkt anfahren 
usw. Nach dem letzten Punkt wird 
(-) eingegeben; alle Punkte werden 
jetzt mit der eingestellten Linienart 
verbunden. 

2. Marker zeichnen (M) 

Bedienung wie unter 1.; hier werden 
die einzelnen Punkte mit dem gewähl¬ 
ten Marker gekennzeichnet. 

3. Füllfeld zeichnen (F) 


Bedienung wie unter 1.; der erste und 
letzte Punkt werden miteinander ver¬ 
bunden. Auf dem Bildschirm ist nur 
ein Rahmen zu sehen, doch der 
Drucker füllt diesen entsprechend aus. 

4. Rechteck zeichnen (C) 

Anfangs- und Endpunkt einer Diago¬ 
nale müssen eingegeben werden, um 
diese Diagonale wird dann eine unge¬ 
füllte Box gezogen. 

5. Kreis zeichnen (K) 

Der erste Punkt ist der Mittelpunkt. 
Hiernach wird der Radius in cm an¬ 
gegeben, anschließend zwei Gradzah¬ 
len, die Anfang und Ende des 
Kreisbogens angeben. Für einen Voll¬ 
kreis gibt man 0 Grad und 360 Grad 
ein. Die Gradpositionen sind wie folgt 
angeordnet: 

90 

* 

* 

180 000 
* 

* 

270 

6. Text eingeben (T) 

Der erste Punkt ist der Anfangspunkt. 
Jetzt kann der gewünschte Text ein¬ 
gegeben werden, dieser wird an der 
gewünschten Stelle dargestellt. Durch 
die verschiedenen Texthöhen, die am 
Bildschirm nicht dargestellt werden 
können, ergeben sich unterschiedliche 
Wortlängen. Um sehen zu können, wo 
der eingegebene Text mit der jeweili¬ 
gen Schrifthöhe enden würde, wird ein 
(*) eingeblendet. 


7. Markertyp (A) 

Die fünf verschiedenen Markertypen 
können vorgewählt werden. 

8. Linienart (I) 

Die fünf Linientypen können vorge¬ 
wählt werden. Dies muß vor jeder Li¬ 
nie geschehen, die nicht durchgezogen 
sein soll. 

9. Füllstil (O) 

Die drei anwählbaren Füllstile bezie¬ 
hen sich auf ein zu erstellendes Füll¬ 
feld; Füllstil- und -index sollten somit 
vor Erstellung eines Füllfeldes defi¬ 
niert werden. 

10. Füllindex (P) 

Sechs Indices, die sich auf den Füll¬ 
stil beziehen, sind anwählbar. 

11. Buchstabenhöhe (H) 

Fünf verschiedene Buchstabenhöhen 
können angewählt werden. 

12. Wegnehmen (W) 

Hier gehen Sie vor wie unter 4., wo¬ 
bei der Anfangspunkt des Objektes, 
welches entfernt werden soll, in dem 
erstellten Rechteck enthalten sein muß. 
Wenn das Rechteck groß genug ist, 
können auch mehrere Objekte gelöscht 
werden. 

13. Raster (R) 

Auf dem Bildschirm wird ein Punkt¬ 
raster mit einem Abstand von einem 
cm ausgegeben (übertragen auf 
Druckerausgabe). 

14. Cursorschritt (S) 

Die Schrittweite des Grafikcursors 
(Fadenkreuz) kann von 0,1 mm bis 1 
cm eingestellt werden. 
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15. Ende (E) 

Hier wird die aktuelle Grafikdatei ge¬ 
schlossen und zum Hauptmenue zu¬ 
rückgekehrt. 

An dieser Stelle noch einige Hinwei¬ 
se zum Abtippen des Listings: Gele¬ 
gentlich taucht die Tastenkombination 
kursiv P -I- kursiv T in einem Listing 
auf. Dies Phänomen entsteht durch die 
Druckerausgabe; beim Listen auf dem 


Bildschirm entpuppen sich diese Buch¬ 
staben als eckige Klammern. Geben 
Sie also für kursiv P ein ALT ä ([), 
kursiv T entspricht ALT ü (]). 
Erscheint in einem Listing ein spitzes 
Dach, welches auf der Tastatur unauf¬ 
findbar scheint, so handelt es sich 
schlicht um das Potenzierungszeichen 
(T), welches sich auf der Tastatur 
rechts neben dem scharf-S (ß) befin¬ 


det. Die links neben dem Listing in 
spitzen Klammern befindlichen Zah¬ 
len sind Prüfsummen, die Ihnen in 
Verbindung mit dem Joyce-Check¬ 
summer aus Heft 2/87 ein fehlerfrei¬ 
es Abtippen ermöglichen; diese dür¬ 
fen nicht mit abgetippt werden. 

Und jetzt wünschen wir viel Spaß mit 
dem CAD-Programm. 

(J.Buckert/me) 


LISTING >CAD <. REMARK = >'< 

<96> 1. * 

< 1> 5. 'Statuszelle + Initialisierung 

< 2 > 6 . ' 

<20> 10 PRINT CHRS(27);"0* 

<18> 20 OOSUB 50000 
<12> 25 * 

< 2> 30 ‘Variablen definieren 
<13> 35 ' 

<Q4) 40 eS=CHRS(27>:con$=eS+"e":coff$=eS+"f" : ion$=eS+"p 
*:iof f*=eS+"q":clS=e$+"E"+e$+"H":clrest$=e$+"J" 
<78) 45 hoe=303. 03:flle%=l:f112=2:PI=3.141593 
<18> 47 ' 

<47> 50 'Funktionen definieren 
<15> 55 ' 

<34> 60 DEF FNmenS=eS+"X"+CHR$(32+0)+CHRS(32+70)+CHRS(3 
2+26)+CHRS(32+22) 

<66> 65 DEF FNbild$=e$+"X" +CHRS (32+D+CHRS (32+0)+CHR3 (3 
2+25)+CHR$(32+67) 

<80> 70 DEF FNeingabeS=e$+"X"+CHR$(32+28)+CHRS(32+0)+CH 
RS(32+7)+CHRS(32+90) 

<73> 80 DEF FNalles$=e$+"X''+CHRS (32+0) +CHRS (32+0) +CHRS ( 
32+32)+CHRS(32+90) 

<72> 90 DEF FNposS=eS+"Y"+CHRS(32+yp)+CHRS(32+xp) 

<19> 95 ' 

< 8> 100 1 Hauptpragranun mit Diskettenverwaltung 
<33> 105 ' 

<66> 110 PRINT FNallesS;cl$; ;yp=4;xp=10:PRINT FNposS;CH 
RS(150);STRINGS(66,CHRS(154)); CHRS(156) 

<24> 115 yp=5:xp=10:PRINT FNposS;CHRS(149);" Seitengest 
altungsprogramm Version 1.0... ";CHRS(164);" 1986 
von Jörg Buckert CHRS(149) 

<33> 117 yp=6:xp=10:PRINT FNposS;CHRS(147);STRINGS(66,C 
HRS(154)>;CHRS(153) 

<24> 120 PRINT:PRINT SPC(12);“Dateien auf dieser Disket 
te:" 

<24> 130 IF FI5DS("*.DAT"> ="" THEN PRINT:PRINT SPC(20); 

"Keine Datei vorhanden":GOTO 150 
<72> 140 PRINT:PRINT SPC(14);:DIR *.DAT 
<39> 150 PRINT: PRINT: PRINT SPC(12); “BAK-Dateien auf die 
ser Diskette:" 

<68> 160 IF FINDS("*.BAK")="" THEN PRINT:PRINT SPC(20); 
"Keine Datei vorhanden." ; GOTO 180 

< 5> 170 PRINT:PRINT SPC(14);:DIR *.BAK 

<68> 180 PRINT;PRINT;PRINT SPC(12);"Es stehen nun felge 
nde Punkte zur Auswahl;" 

<16> 190 PRINT:PRINT SPC(20);"1 = neue Datei erstellen" 
<27> 200 PRINT SPC(20>;"2 = alte Datei bearbeiten" 

<58> 210 PRINT SPC(20);"3 = Datei löschen" 

<71> 220 PRINT SPC(20);"4 = Datei umbenennen, oder zurü 
ckholen" 

<15> 230 PRINT SPC(20);"5 = Datei drucken" 

<62) 240 PRINT SPC(20);"6 = zurück zum System" 

<20> 250 PRINT: PRINT SPC(25>;*Vähle ?"; 

<89> 260 taste$=INKEYS 
<90> 270 IF tasteS="1“ THEN GOTO 1000 
<60> 280 IF tasteS="2" THEN GOTO 1500 
<92> 290 IF tasteS="3“ THEN GOTO 500 
<21> 300 IF tasteS="4" THEN GOTO 600 
<?3> 310 IF tasteS="5“ THEN GOTO 2000 
<86> 320 IF tasteS="6" THEN GOTO 700 
<?0> 330 GOTO 260 
<2B> 340 ' 

<70> 500 'Datei löschen 
<37> 505 ' 

<34> 510 yp=17:xp=0:PRINT FNposS;clrestS 

< 9> 520 PRINT:PRINT "Name der Datei: INPUT nameS 

<67> 525 PRINT "Dateityp: ";:INPUT typS 

<36> 530 IF FINDS(name$+".“+typS)="" THEN GOTO 510 

< 3> 540 typS-(JPPERS(typS) 

<14> 550 IF typS=“BAK" THEN KILL nameS+".BAK":GOTO 100 
<41> 560 IF FINDS(nameS+".BAK")="“ THEN GOTO 570 ELSE K 


ILL nameS+" . BAK" : GOTO 570 

< 8> 570 NAME nameS+“.DAT” AS name$+" . BAK" 

<12> 580 GOTO 100 

<40> 590 1 

<55> 600 'Datei umbenennen 
<38> 605 ' 

<35> 610 yp=17:xp=0: PRINT FNposS;clrestS 

<10> 620 PRINT:PRINT "Name der Datei: INPUT nameS 

<68> 625 PRINT "Dateityp: INPUT typS 

<80> 630 IF FINDS (natneS+". "+typ$)="" THEN GOTO 610 

< 4> 640 typS=UPPERS(typS) 

<63> 650 IF typS="BAK" THEN NAME nameS+".BAK" AS nameS+ 
".DAT":GOTO 100 

<60> 660 PRINT "neuer Name: INPUT neunamS 

<60> 670 IF FINDS(neunaraS+".DAT")="" THEN GOTO 680 ELSE 
GOTO 660 

<86> 680 NAME nameS+".DAT" AS neunamSt",DAT" 

<15> 690 GOTO 100 
<56> 695 ' 

<96> 700 'Zurück zum System 
<39> 705 ' 

<36>-710 yp=17:xp=0:PRINT FNposS;clrestS 

<93> 720 PRINT;PRINT "Zurück zum System <J/N) ?" 

<62> 730 tasteS=INKEYS:taste$=UPPER$(tasteS) 

<53> 740 IF tasteS="J" THEN CLOSE:PRINT clS;conS;ioff$: 
SYSTEM 

< 9> 750 IF tasteS="N" THEN GOTO 100 

< 4> 760 GOTO 730 
<38> 770 ' 

<55> 800 'Bildaufbau zur Datelerstelluhg + Bearbeitung 
<40> 805 ' 

<80> 810 PRINT clS; 

<50> 820 FOR 1=1 TO 27:PRINT SPC(68);CHRS(149):NEXT i:P 
RINT STRINGS(68,CHRS(154));CHRS(155);STRINGS(21,CH 
RS(154)) 

<62> 860 PRINT FNmenS;cl$;ion$;SPC(18);" ":PRINT "... H 

auptmenü:_ PRINT SPC(18>;" "iioffS 

<54> 861 PRINT: PRINT " L = Linien":PRINT " M = Marker": 
PRINT " F = Füllfeld";PRINT:PRINT " C = Rechteck" 

< 0> 862 PRINT:PRINT " K = Kreise":PRINT * T = Text":PR 

INT:PRINT " A = Markertyp":PRINT " I = Linientyp": 
PRINT "'0 = Füllstil":PRINT " P = Füllindex" 

<73> 863 PRINT:PRINT " H = Buchst.Höhe":PRINT:PRINT " V 
= Vegnehmen" 

<14> 887 PRINT:PRINT " R = Raster*:PRINT " S = Cursorsc 
hritt":PRINT " E = Ende" 

<95> 888 PRINT FNeingabeS;:RETURN 
<68> 889 ' 

<96> 890 'Raster 
<46> 891 ' 

<86> 892 FOR a=6000 TO 29989 STEP 1043:FOR b=0 T0 23028 
STEP 1212: n=4: x%(l)=b; x%(2)=a: x*4(3)=b: x%(4)=a:GOS 
UB 10000:NEXT b:NEXT a 

< 8> 895 RETURN 
<70> 899 ' 

<87> 900 'Befehl in Datei schreiben 
<41> 905 ' 

<97> 910 VRITE #fil«,befS,n 
<89> 920 FOR i=l TO n 
<12> 930 VRITE #f11%,x%<i> 

< 2> 940 NEXT i 
<98> 945 RETURN 
<55> 947 ' 

<69> 950 'Befehl aus Datei lesen 
<51> 955 ' 

<15> 960 INPUT #file%,befS,n 

< 0> 970 FOR i=l TO n 

<79> 980 INPUT ffileÄ,x%(i) 

<12> 990 NEXT i 

< 9> 995 RETURN 
<65> 997 ' 

<77> 1000 'Datei erstellen 

< 4> 1005 ' 
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<37> 
<61> 
< 8 > 

< 4> 
<77> 
<82> 
<18> 
<91> 
<?9> 
<14> 
<47> 
<71> 
< 11 > 
<35> 

<53> 

<54> 

<38> 

<41> 

<80> 

<41> 

<95> 

<61> 

< 5> 
<38> 
<62> 
<27> 
<51> 

<44> 

<13> 


< 0 > 
< 11 > 
< 21 > 
<62> 
<52> 


<61> 
<43> 
< 1 > 
<95> 
<46> 
<26> 

< 9> 
<90> 

< 3> 
<23> 
<65> 
<84> 
<39> 
<25> 
< 10 > 
< 22 > 

<37 > 

< 8 > 
<75> 
<58> 


1010 yp=17: xp=0: PRIST FBpos®; clrestS 
1020 FRIST:PRIST "Same der Datei: ";:ISPUT nameS 
1030 IF F1HDS (name$+*. DAT") ="" THBH GOTO 1040 ELSE 
GOTO 1010 

1040 OPEH "O",fil%,naneS+". DAT" 

1070 GOSUB 3000 
1100 CLOSE 
1110 GOTO 100 
1120 ' 

1500 'Datei bearbeiten 
1505 ’ 

1510 yp=17:xp=0:PRIST FSposS;clrestS 
1520 PRIST:FRIST "Kan« der Datei: "ISPUT namsS 
1530 IF FIND® (nameS+". DAT")=*" THEK GOTO 1510 
1532 IF FIHDS(naae$+".BAK")="" THES GOTO 1535 ELSE 
KILL nameS+". BAK" 

1535 BAKE nameSt" . DAT" AS name$+" . BAK" 

1540 OPES " I" ,file%, nameS+" . BAK" 

1565 GOSUB 800 
1570 GOSUB 2500 
1580 GOSUB 3015 
1590 GOTO 1100 
1600 ' 

2000 'Datei drucken 
2005 ' 

2010 yp=l?:xp=0: PRIST FBposS;clrestS 
2020 PRIST:PRIST "Same der Datei: ISPUT naneS 

2030 IF FISDS <nameS+" . DAT") =" " THES GOTO 2010 
2032 IF FIBDS(name$+".BAK")=*" THEK GOTO 2035 ELSE 
KILL nameS+". BAK" 

2035 KAKE nameSt".DAT" AS name$+" . BAK" 

2036 PRIST FBallesS;clS;".. DRUCKEREIBSTELLUBG:":P 
RIST:PRIST:PRIST "Einzelblatt, es sollte ganz nach 

links eingelegt werden!PRIST: PRIST "Auflösung:. 

normale. = N":PRIST;PRIST ". doppelte = 

D":PRIST:PRIST "... Vähle?" 

2037 taste$=ISKEY$:taste$=UPPERS(taste®) 

2038 IF tasteS="D" THE» device7.=21: GOTO 2043 

2039 IP tasteS="H" THES devlce%=22:GOTO 2043 

2042 GOTO 2037 

2043 GOSUB 50080:x%(l>=400:GOSUB 11000:PRINT FSall 
esS;coffS:yp=15:xp=28:PRIST FNposS;"Es wird gedruc 
kt, bitte warten!" 

2044 OPES "I n ,fileü,nameS+" . BAK" 

2045 GOSUB 2500 
2050 GOSUB 50200 
2060 GOSUB 50170 

2065 devlce%=l:GOSUB 50080 
2070 GOTO 1100 
2080 ' 

2500 'Datei auslesen 
2502 ' 

2505 OPES "O*,f11%,name$+" . DAT" 

2510 VHILE SOT EOF(file%> 

2520 GOSUB 950 
2525 GOSUB 900 

2527 IF device%=21 OR device%=22 THES GOSUB 2600 
2530 frag=ISSTRC"LMFTKBCHIAOP",bef$> 

2540 OS frag GOSUB 10000,10100,10150,10200,8560,10 
320,10400,11000,11100,11150,7640,7740 
2550 VESD 
2560 RETURH 

2600 frag=INSTR("TKHIAOPC",bef$) 

2601 IF frag=0 THES GOTO 2609 ELSE GOTO 2602 


<38> 2602 OS frag GOTO 2700,2800,2900,2900,2900,2900,29 
00,2850 
<60> 2609 1=1 

<51> 2610 xü(i) = IST(x%(i>/0.75) 

<68> 2620 i=U l:x5Kl)=INT(<x%(i>-0000)/0. 75) 

<74> 2630 IF i>=n THES RETURH ELSE i=i+l:GOTO 2610 
<66> 2700 xX(l)=IST(x%(l>/0.75) 

<94> 2710 x%(2)=IHT(<x%<2)-6000)/0. 75) 

< 0> 2720 RETURH 

<47> 2800 GOSUB 2700:x%(3)=INT(x%(3>/0.75);x%C6)=IST<x% 
<6)/0.75):RETURH 

<75> 2650 GOSUB 2700: XÄC3) = INT(xU(3)/0. 75): x7.(4> = I5T(<x 
%(4)-6000>/0.75):RETURS 
<97> 2900 RETURH 

< 6> 2910 ' 

< 0> 3000 'Datei konstruieren 

< 6> 3005 * 

<94> 3010 GOSUB 800 

<69> 3015 tabsx=1212:tabsy=1043:ypos=17478:xpos=9697;GO 
SUB 20000:PRIST FNallesS;"X-Koordinate= ";USIHG "# 
##,##"ixpas*0.825/1000;:PRINT "cm, Y-Koordinate= " 

;USIHG "###.##";<ypos-6000)*0.9583333/1000;:PRIST 
"cm"; FHeingabeS 

<52> 3017 x%(l)=l: GOSUB 11100: xX (1 )=0: x%(2)=0: x7.(3)=0: x 
%(4)=0:n=4:GOSUB 10000 
<96> 3020 PRIST clS;"Befehl ?" 


<72> 

3030 

taste$=INKEY$: 

taste$=UPPERS(taste®) 


< 2> 

3040 

IF 

tasteS="L" 

THES 

GOSUB 

4000:GOTO 3020 


<84> 

3041 

IF 

taste$="K" 

THES 

GOSUB 

4500:GOTO 3020 


<38) 

3042 

IF 

tasteS="F" 

THES 

GOSUB 

5000:GOTO 3020 


<44> 

3043 

IF 

taste$="T" 

THEN 

GOSUB 

5500:GOTO 3020 


< 12> 

3044 

IF 

tasteS="H" 

THEN 

GOSUB 

6000:GOTO 3020 


<91> 

3045 

IF 

taste$="C" 

THEN 

GOSUB 

6500:GOTO 3020 


<34> 

3047 

IF 

taste$="I“ 

THEN 

GOSUB 

7500:GOTO 3020 


<70> 

3048 

IF 

tasteS="A" 

THEN 

GOSUB 

8000:GOTO 3020 


< 3> 

3049 

IF 

taste$="R" 

THEN 

GOSUB 

890:GOTO 3020 


<74> 

3050 

IF 

taste$="K" 

THES 

GOSUB 

8500:GOTO 3020 


<48> 

3051 

IF 

taste$="Q" 

THEN 

GOSUB 

7600:GOTO 3020 


< 2> 

3052 

IF 

tasteS="P" 

THES 

GOSUB 

7700:GOTO 3020 


<89> 

3053 

IF 

tasteS="V 

THES 

GOSUB 

8800:GOTO 3020 


<81> 

3054 

IF 

tasteS="S" 

THES 

GOSUB 

20300:GOTO 3020 


<70> 

3055 

IF 

tasteS=CHRS <31) 

THES GOSUB 20100:GOTO 

3020 

<49> 

3056 

IF 

taste$=CHRS(30) 

THES GOSUB 20150:GOTO 

3020 

< 1> 

3057 

IF 

tasteS=CHR$(1> THES GOSUB 20200: GOTO 3020 

< 3> 

3058 

IF 

tasteS=CHRS(6) THES GOSUB 20250: GOTO 3020 

<30> 

3059 

IF 

tasteS="E" 

THES RETURS 



<73> 3060 GOTO 3030 

< 7> 3070 ' 

<88> 4000 'Linien 

< 7> 4005 ' 

<71> 4010 bef$=*L’:l=l:n=2 
<94> 4020 GOSUB 25000 
<17> 4040 GOSUB 900 

< 4> 4050 GOSUB 10000:x%( 1>=1:GOSUB 11100:x%(l)=x%(n-l> 

:xZ(2)=xK(n>:x%(3)=x%(1>; xX (4)=x%(2):n=4 
<74> 4060 GOSUB 10000:RETURN 

< 8> 4070 ' 

<46> 4500 'Karker 
<17> 4505 ' 

<93> 4510 bef*="K":i=l:n=2 

< 5> 4520 GOSUB 25000 
<27> 4540 GOSUB 900 

<95> 4550 GOSUB 10100:RETURS 
<15> 4560 ' 

< 0> 5000 'FüllFeld 


JOYCE 

MARTIN KEMPEN ICH 

COMPUTER HARD- U. SOFTWARE 

SOFTWARE 

ZETASTRASSE 13 

6220 RÜDESHEIM 4 



Super nur 359,- 

kostet unsere 3.5“ Dis ketten Station ,,,,,, .. r . 

anschlußfertig mit Kabel an CPC-6128 

• Epson 2x40 Track Standardlauf¬ 
werk. Kann bei Systemwechsel 
z.B. an Schneider PC angeschlos¬ 
sen werden (360 KB). 

180 KB mit CPC-6128. 

• Ausführung in 5 1/4" 498,- 

Schüngel Datentechnik GmbH 

Meckenheimer Allee 73, 5300 Bonn, Tel (0228) 6590 77, Tx 8 85 772 schdt d 
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< 8> 

5005 ' 

<73> 

IT<xX(6>*SII(b)) 

8565 IF x%<4>/5=INT(x%(4>/5> THEI GOTO 6567 

< 0> 

5010 befS="F": 1=1: n=2 

<48> 

8566 xX(4)=xX(4)+l;GOTO 8565 

<95> 

5020 GOSUB 25000 

<56> 

8567 IF xX(5>/5=INT(x%<5>/5) THEI GOTO 8570 

< 18> 

5040 GOSUB 900 

<71> 

8568 xX(5>=xX(5) - l:GOTO 8567 

<62> 

5050 GOSUB 10150:RBTURI 

<22> 

8570 1=14 

< 6> 

5060 1 

<28> 

8571 FOR J=xX(4) TO xX<5> STEP 5 

<97> 

5500 'TEXT 

<89> 

8572 a=j*PI/180:x%<i)=xX(l>+IIT<x%<3>*COS(a>>:x%(l 

<18> 

5505 1 


+1>=xX(2>+IIT(x%(6>*SII(a)> 

<82> 

5510 befS="T" 

<10> 

8573 1=1+2 

<77> 

5520 xX(l>=xpos:x%(2>=ypos 

<38> 

8574 IEXT J 

<11> 

5530 INPUT "Text=";texS 

<33> 

8580 ptsinX(l)=xX(10): ptsinX<2> =xX(ll) 

<30> 

5540 n=LEI(texS>+2 

< 7> 

8582 FOR j=14 TO 1-1:ptsinX<j-ll)=x%Cj>:HEXT J 

<80> 

5550 FOR 1=3 TO n 

<75> 

8584 ptsinX(i-ll>=x%<12>:ptslnX Ci-10)=xX<13) 

<61> 

5560 xXU>=ASC<XIDS<texS,i-2, D) 

<27> 

8586 contrlX<l>=6:contrlX(2>=(i-10)/2 

< 8> 

5570 HEXT i 

<87> 

8588 GOSUB 60000:RETURN 

<40> 

5580 GOSUB 900 

<28 > 

8590 1 

<75> 

5590 GOSUB 10200: a=LEHCtex*>: b=IIT<a*hoe>: x%(2)=yp 

<16> 

8800 1 Löschen 


os:xX(4 >=ypos:xX(1)=xpos+b:xX(3)=xX(1>:n=4:GOSUB 1 

<27> 

8805 ' 


0100:RBTURI 

<25> 

8810 bef$="V:1=1:n=2 

<45> 

5595 ' 

<15> 

8820 GOSUB 25000 

<79> 

6000 'Buchstabenhöhe 

<62> 

8630 xt=xX(1>: yl=xX<2): x2=xX(3>: y2=x% (4) 

<96> 

6002 ' 

< 9> 

8910 CLOSE 

<59> 

6005 bef$="H": n=l 

< 4> 

8920 OPEI "I*,fileX,naae$+" . DAT" 

<22> 

6010 IIPUT "Buchstabenhöhe: 200=laa; 400=3am; 600= 

<34> 

8925 OPEI "0",f il%,nameS+". SS$" 


4.5aun; 800=5.5»m; 1000=7am; wähle= ";xX(l> 

<85> 

8930 VHILE HOT EOF(fileX) 

<30> 

6015 GOSUB 900 

<22> 

8935 GOSUB 950 

<48> 

6020 GOSUB 11000:IF xX(l>=200 THE! hoe=157.6 

<96> 

8940 IF xX(l>>=xl AID x%ClK=x2 AID xX<2>>=yl AID 

<64> 

6030 IF xX(l>=400 THEI hoe=303.03 


x%(2> <=y2 THEI GOTO 8950 

< 5> 

6040 IF xX(l>=600 THEH hae=460.6 

<59> 

6945 GOSUB 900 

<10> 

6050 IF x%<l>=800 THEI hoe=630.3 

<51> 

8950 VEHD 

<57> 

6060 IF xX(l>=1000 THEI hoe=775.8 

<41> 

8955 CLOSE 

< 5> 

6070 RETURI 

< 3> 

8960 PRIIT FIbildS;cl$;FlelngabeS 

<13> 

6080 ' 

<20> 

8970 IF FIHDS(name$+" . BAK">=*" THEI GOTO 8980 ELSE 

<71> 

8500 'Rechteck 


KILL naneS+". BAK" 

<19> 

6505 ' 

<69> 

8980 KILL name$+" . DAT" 

<74> 

6510 bef$="C*: 1=1: n=2 

<65> 

8985 IAHE nameS+*.$SS" AS name$+".BAK" 

< 7> 

6520 GOSUB 25000 

<84> 

8990 OPEI " I" , fileX, namei+" . BAK" 

<49> 

6545 GOSUB 900 

<90> 

8995 GOSUB 2500:GOSUB 3015:GOTO 1100 

<40> 

6550 GOSUB 10400:RBTURI 

<64> 

8997 • 

<17> 

6560 ' 

<47> 

10000 * POLYLIIE 

<33> 

7500 'Linientyp 

<23> 

10005 ' 

<20> 

7505 ' 

<11> 

10010 contrlX<l)=6:contrlX<2>=n/2 

<51> 

7510 bef$="I" 

<33> 

10020 FOR 1=1 TO n 

<47> 

7520 n=l:PRIIT cl$;"l=durchgehend, 2=unterbrachen, 

<49> 

10030 ptsinX(i>=xX(l> 


3=gepunktet, 4=Strlch-Punkt, 5=lange Striche":IIP 

<24> 

10040 HEXT i 


UT "Vähle= ";xX<l) 

<21> 

10050 GOSUB 60000:RETURI 

<27> 

7530 GOSUB 900 

<22> 

10060 • 

< 9> 

7540 GOSUB 11100:RETURI 

<28> 

10100 ’POLYXARKER 

< 15> 

7550 ' 

<26> 

10105 1 

<69> 

7600 * Fiillstll 

<32> 

10110 contrlX(l>=7:contrlX(2>=n/2 

<22> 

7605 ' 

<27> 

10120 GOTO 10020 

<40> 

7610 befS="0*: n=l 

<13> 

10130 * 

< 9> 

7620 IIPUT "l=Rahnen, 2=Schattlerungen, 3=Schraffu 

<19> 

10150 'Füllfeld 


reu, wähle= H ;xX(l) 

<46> 

10155 ' 

<29> 

7630 GOSUB 900 

<88> 

10160 contrlX(l)=9:contrlX<2>=n/2 

<44> 

7640 cantrlX(l>=23:contrlX<2)=0 

<47> 

10170 GOTO 10020 

< 3> 

7850 lntinX(l)=xX<l>:GOSUB 60000:RETURI 

<33> 

10180 ' 

<20> 

7660 ' 

<32 > 

10200 'TEXT 

<41> 

7700 'FüllIndex 

<29> 

10205 ' 

<24> 

7705 * 

<31> 

10210 contrlX(l>=8:contrl%<2>=l:contrlX(4>=n-2 

<54> 

7710 bef*="P":n=l 

<17> 

10220 ptslnX <1)=x% <1):ptslnX <2 > =x% <2) 

<22> 

7720 PRIIT "Schraffuren: l=senkrecht, 2=waogerecht 

<69> 

10230 FOR 1=3 TO n 


, 3=+45", 4=-45“, 5=senkr. + waager. , 6=+45"/-45",": 

<59> 

10240 intinXa-2>=xX(i> 


IIPUT "Schattierungen: l-6=Stärke, wähle= ";x%(l> 

<34> 

10250 HEXT 1 

<31> 

7730 GOSUB 900 

<31> 

10260 GOSUB 60000:RETURI 

<64> 

7740 contrl%(l>=24:contrlX<2>=0 

<32> 

10270 ' 

< 5> 

7750 lntlnXa>=xX(l>: GOSUB 60000: RETURI 

< 0> 

10400 'Rechteck 

<22> 

7760 ’ 

<35> 

10405 ' 

<71> 

8000 'Markertyp 

< 6> 

10410 contrlX<l>=10:contrlX(2>=2: contrlX(9>=1 

<11> 

8005 ' 

<30> 

10415 intin%(l>=0 

<45> 

8010 bef*=*A" 

<73> 

10420 FOR 1=1 TO 4: ptsinXU )=xX(i >: HEXT 1 

<53> 

8020 n=l:PRIIT cl$;"l=Punkt, 2=Plus, 3=Stern, 4=Kr 

<25> 

10430 GOSUB 60000:RETURI 


eis, 5=fCreuz" : IIPUT "VKhle= ";xX(l> 

<34> 

10460 ' 

<18> 

8030 GOSUB 900 

<61> 

11000 'Buchstabenhöhe 

<75> 

8040 GOSUB 11150:RETURI 

<25> 

11005 ' 

< 6> 

8050 ' 

<89> 

11010 contrlX(l)=12:contrlX(2)=l 

< 9> 

8500 'Kreis 

<66> 

11020 ptslnX(l>=0:ptsln%<2)=x%(l> 

<21> 

8505 ' 

<15> 

11030 GOSUB 60000:RETURN 

<78> 

8510 bef»="K" 

<16> 

11040 ' 

< 5> 

8520 n=6 

<98> 

11100 'LIFETYPE 

<97> 

8530 xX(l>=xpos:xX(2)=ypos: IIPUT "Radius </cm)=";r 

<28> 

11105 ' 


: xX(3>=r*1000/0.825: xX(6)=r»l000/0,9583333: IIPUT " 

<90> 

11110 contrlX(l) = 15:contrlX(2)=0: lntln%<l)=xX(l> 


von Grad=";xX(4) •IIPUT "bis Grad=";xX(5> 

<14> 

11120 GOSUB 60000:RETURI 

<31> 

8540 GOSUB 900 

<15> 

11130 ' 

<29> 

8560 IF x%(5)<x%(4> THEI SVAP xX<4),xX(5> 

<25> 

11150 ’KARKERTYPE 

<45> 

8561 a=xX(4>»PI/180:b=x%(5)*PI/180 

<48> 

11155 ' 

<80> 

8562 xXaO)=xXa>+INT<x%(3)*COS<a>>:xX(ll)=xX<2) + I 

<68> 

11160 contrlXCl)=18:contrlX(2)=0:intinX(l)=xX(l) 


IT(xX(6)*SIN Ca>) 

<34> 

11170 GOSUB 60000:RETURI 

<85> 

8563 xX<12>=xX(l>+IBT<x%(3)*COS(b)):x%(13)=x%<2)+I 

<35> 

11180 ' 
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<13> 

<24> 

<51> 

<35> 

< 14> 
<50> 
<26> 

< 4> 

< 0 > 


<59> 
<52 > 


< 3> 
<94> 


<74> 

<62> 


<48> 

<52> 

<16> 

< 20 > 

<70> 

<89> 

<33> 

<43> 


<40> 

<95> 

<70> 

<25> 

< 17> 
< 22 > 
<45> 
<94> 
<27> 
<39> 

<57> 

<41> 

<63> 

<19> 

< 66 > 

<30> 

<85> 

<59> 

< 6 ?> 

<71> 

< 19> 
<13> 
<40> 
<24> 
<39> 
<29> 
<78> 
<58> 
<46> 
<44> 

< 8 > 
<82> 
<37> 
<611 
<23> 
<24 > 
<47> 
<28> 
<73> 
<25> 
<47> 
<96> 
< 19> 
<23> 
<71> 


20000 'Graphcursor 
20005 * 

20010 contrl%<l)=5:cantrl%<2)=2:contrl%(6>=18 
20020 ptsinfc<l)=xpos:ptsiaH( 2 >=ypos 
20030 GOSUB 60000:RETURH 

20050 contrl%(l>=5:contrl%<2>=0:contrl%<6)=19 
20060 GOSUB 60000:RETURH 
20100 IF ypos>=29994 THEH RETURH 
20110 ypos=ypos+tabsy:GOSUB 20050:GOSUB 20000:FRIN 
T FHallesS;"X-Koardinate= ";USI5G "###.##";xpos*0. 
825/1000; :PRI!TT 'cm, Y-Koordinate= “;USIHG "###.## 
M ;(ypos-6000)*0.9583333/1000;:PRIST "ca";FNeingabe 
£:RETURH 

20150 IF ypos<=6005 THEH RETURH 
20160 ypos=ypos-tabsy:GOSUB 20050:GOSUB 20000:PRIH 
T FHallesS;"X-Koordinate= ";USI5G xpos*0. 

825/1000; :FRIirr "cm, Y-Koordlnate= ";USIHG "###.## 
<ypos-6000)*0.9583333/1000;:PRIHT “cm";FHeingabe 
$:RETURH 

20200 IF xpos<=3 THEH RETURH 

20210 xpos=xpos-tabsx:GOSUB 20050:GOSUB 20000:PRIH 
T FHallesS;"X-Koordlnate= ";USIHG "###.##";xpos*0. 
825/1000; :PRIHT "cm, Y-Koordlnate= " ; USIHG ”###.## 
(ypos-6000>*0.9583333/1000; ;PRIHT "cm";FNeingabe 
S:RETURH 

20250 IF xpos>=23997 THEH RETURH 
20260 xpos=xpos+tabsx:GOSUB 20050:GOSUB 20000:PRIH 
T FHallesS; "X-Koordinate= USIHG "###.##";xpostO. 
825/1000;: PRIST "cm, Y-Koordinate= ";USIHG "###.## 
"; (ypos-6000)*0.9583333/1000; :PRIIT "cm";Fleingabe 
S:RETURH 

20300 IHPUT “Cursor-Offset (0. 01-1)“;tabs:tabsx=ta 
bsf1212: tabsy=tabs*l043 
20310 RETURH 
20320 ' 

24980 1 nächsten Punkt wählen 
24990 ' 

25000 PRIHT cl$;"nächster Punkt ?.. PfT=wählen, P- 
beenden":x%(i>=xpos:x%(i+l>=ypos: i=i+2 
25010 tas*=IHKEY$:tas$=UPPERS(tasS) 

25020 IF tas$=CHRS(22) THEH n=n+2:IF bef$="C" OR b 
e fS="V" THEH x%(i)=xpos:x%(i + l)=ypos: RETURH ELSE G 
OTO 25000 

25030 IF tasl=CHRS(28) THEH RETURH 

25040 IF tasS=CHR$(31) THEH GOSUB 20100:GOTO 25010 

25050 IF tasS=CHRS(30) THEH GOSUB 20150:GOTO 25010 

25060 IF tasS=CHR$(l> THEH GOSUB 20200:GOTO 25010 

25070 IF tasS=CHRS(6> THEH GOSUB 20250:GOTO 25010 

25080 GOTO 25010 

25090 ’ 

50000 'GSX-Initlalisierung 
50005 * 

50010 D1H pb%(5),contrl%(10),intin%(255),ptsin%(20 
0),intout%<45),ptsout%(100>,XÄC200) 

50020 gdQ6%=&HBDF0:MEMORY gdos%-l 
50030 PORE gdos%,14:PORE gdos*+1,115 
50040 PORE gdos%+2,195:PORE gdos%+3,5:PORE gdosX+4 
,0 

50050 devicett=l: GOSUB 50080 
50060 RETURH 
50070 ' 

50080 'Open-Vorkstation 
50085 ' 

50090 GOSUB 50170 

50100 contrl%<l>=l:contrlÄ<2)=0:contrl%(4>=10 
50110 intin%<l)=deviceÄ 
50120 RESTORE 50150 

50130 FOR 1=2 TO 10:READ intin«(i>:HEXT 
50140 GOSUB 60000:RETURH 
50150 DATA 1,1,3,1,1,1,2,6,1 
50160 * 

50170 1 Close-Vorkstation 
50175 1 

50180 contrl%(l>=2:contrl%(2)=0 
50190 GOSUB 60000: RETURN 
50200 * 

50210 'Update-Vorkstation 
50215 ' 

50220 contrl%(l)=4:contrl%<2>=0 
50230 GOSUB 60000;RETURH 
50240 * 

60000 'CALL 
60005 * 

60010 pb%(l)=UHT(VARPTR(contrl%<l)) > 

60020 pb% <2)=UNT(VARPTR(int1n%<1>)) 

60030 pb'4 <3)=UNTCVARPTR(ptsin%<1))) 

60040 pb%(4>=UHT(VARPTR <intout*(1>)1 
60050 pbX <51=ÜNT(VARPTR(ptsou t% <11)1 
60060 CALL gdasü(gdos%,pb%(l)) 

60070 RETURH 


Jetzt kommen die Software-Profis! 


Die mit Erfahrung 

NEUE Programme für PC 1512 

Seit 1969 

ELSAS-Projektverwaltung 

DM 942.- 

ELSAS—Aktenverwaltung 

DM 942,- 

ELSAS + - Projektverwaltung 

DM 1392,- 

ELSAS + - Aktenverwaltung 

DM 1392.- 

ELSAS-86-Anlagenbuchhaltung 

DM 892,- 

‘Lohn/Gehalt für Einzelanwender 

ab DM 1999.- 

* Lohn/Gehalt für Mehrfachanwender 

ab DM 2451,- 

'Baulohn für Einzelanwender 

ab DM5187,- 

’Baulohn für Mehrfachanwender 

ab DM 5586, - 

Baustellenauswertung 

DM 1140,- 

'Thermosoft für Heizungsinstallateure 

ab DM 740,- 

"PS für Kfz-Werkstäften 

ab DM 1999,- 

AdreßSfart 

Der Karteikasten für den EDV-Neuling 

Volle Anrechnung des Preises auf Kauf 
von AdressPerfekt oder Quick & Easy 
(keine Demo) 

DM 49,95 

AdressPerfekt 

Adreßverwaltung für den Profi mit Verbin¬ 
dung zu Wordstar, Word und WordPerfect 
sowie den Debitoren aus ComPack 

DM 399.- 

Quick & Easy 

Textverarbeitung und Adreßverwaltung 
für den Profi mit Verbindung zu dön Debitoren 
aus ComPack. (Siehe eigene Anzeige) 

DM 595.- 

Große Umtauschaktion für ComPack- 

und TexPack-Anwender 

' 'TexPack-CPC gegen TexPack-JOYCE 

DM 98, - 

* 'TexPack gegen Quick & Easy 

DM 489,- 

"ComPack-CPC gegen ComPack-JOYCE 
"ComPack-CPC oder -JOYCE gegen 

DM 79,80 

ComPack PC 1512 

DM 98.- 

"ComPack PC 1512 gegen ELSAS 

Liste mit Unterschieden anfordern! 

DM 298,- 

' * ComPack PC 1512 gegen ELSAS + 

Liste mit Unterschieden anfordern! 

DM 798,- 


'mit Anschluß an ComPack-Finanzbuchhaltung! 
"bei weiterer Verwendung der vorhandenen Daten! 


infosystems 


V SOFTWARE-VERTRIEBS GMBH 
Die helfende Hand im Softwareland! 
Dörrhoff 7 • 4419 Laer • Telefon (025 54) 1232 


DIE HELFENDE HAND IM SOFTWARELAND! 


Schulung, Beratung, Unterstützung ■ ALLES zwei Wochen zur Probe ■ ALLES von INF 08 YSTEMSI 

Bitte senden Sie uns tolgende Programme gegen Bar¬ 
scheck oder Nachnahme, mit 14 Tagen flückgaberecht 
unter Anrechnung von DM 19,80 bei Rückgabe 


COUPON J Bitte senden Sie uns folgende Demo-Disketten mit An¬ 
wenderhandbuch gegen Barscheck oder Nachnahme 
zum Preis von DM 49.90 


| l Bitte senden Sie uns folgende Unterlagen kostenlos; 



Tel.: 

Firma: 




PLZ/Ort: 



Datum/Unterschritt 


CPC 8704 
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BiIdl: Mil 706 kB extern ausgerüstet.... 


51/4 Zoll-Laufwerk am Joyce 


Seit seiner Einführung Ende 1985 ist 
der PCW 8256 und später sein großer 
Bruder PCW 8512 ein Stiefkind der 
Familie Schneider geblieben. Als 
Textsystem deklariert, bot er Anbie¬ 
tern von Soft- und Hardware wenig 
Chancen für ihre Produkte. Inzwi¬ 
schen jedoch (dies ist wohl hauptsäch¬ 
lich den selbstbewußten Joyce-Be¬ 
sitzern zu verdanken) gibt es auf dem 
Zubehörmarkt auch qualitativ hoch¬ 
wertige Peripherie für den Joyce. 
Bei intensiver Nutzung eines Rechners 
als Text-, Kalkulations- oder Dateisy¬ 
stem fallen lange Dateien an, die nach 
preiswerter Speicherung verlangen. 
Der PCW 8512 hat hier einiges zu bie¬ 
ten; speziell das Zweitlaufwerk mit 
über 700 kB Disketlenkapazität läßt 
kaum Wünsche offen. Der hohe Preis 
für eine 3 Zoll-Diskette im DD- 
Format (bis zu 20.- DM;) und das 
branchenunübliche Format haben 
mich veranlaßt, als Alternative ein 5 
1/4-Zoll Laufwerk zum Nachrüsten 
des PCW 8256 vorzustellen. 

Es handelt sich hierbei um das 80 Spur 
(96 tpi/track per inch) Doppelkopf¬ 
laufwerk FD 1055 des Herstellers 
NEC. welches von der Fa. lnnowave 
Data unter dem Namen ID55 an- 
schlußfertig angeboten wird. Der An¬ 


schluß des Laufwerks gestaltet sich 
nach der deutschsprachigen Einbauan¬ 
leitung auch für den Laien problem¬ 
los; einzig benötigtes Werkzeug ist ein 
Kreuzschlitzschraubendreher mittlerer 
Größe. Nach Entfernen der Gehäuse¬ 
rückwand des Rechners wird das mit¬ 
gelieferte Flachbandkabel mittels 
zweier Steckverbinder an das im 
Rechner befindliche Flachbandkabel 
angeschlossen. Das Anschlußkabel 
wird jetzt durch die Gehäuserückwand 
geführt, letztere wieder angebracht 



Bi Ui 2. 


Das Gehäuse gewährI tiefe Einsichten 


und das andere Ende des Flachband¬ 
kabels am Floppy laut werk eingesteckt 
— fertig. Wird jetzt CP/M oder Lo- 
coScript geladen, meldet sich Joyce 
mit zwei Laufwerken zur Stelle. Nach 
dem Formatieren einer jungfräulichen 
Diskette stehen 706 kB zur Verfü¬ 
gung. Die Zusammenarbeit mit Lo- 
coScript und anderen kommerziellen 
Programmen, die die Arbeit mit zwei 
Laufwerken vorsehen, gestaltete sich 
reibungslos. Die wirklich ausgezeich¬ 
nete Mechanik des NEC-Laufwerks 
arbeitete auch unter anderen System¬ 
formaten einwandfrei. Ist die Kaufent¬ 
scheidung erst gefallen, sprechen 
meines Erachtens zwei Gründe für den 
Erwerb eines Zweitlaufwerks im 5 
1/4-Zoll-Format; 

1. Der vergleichsweise zum 3-Zoll- 
Format um bis zu 75% niedrigere Dis¬ 
kettenpreis. 

2. Die Möglichkeit. Texte oder ande¬ 
re Dateien mittels eines entsprechen¬ 
den Dienstprogrammes auch von 
anderen Systemformaten (z.B 360 kB- 
IBM (MS/DOS)-Format) lesen zu 
können. 

Nachteilig ist, daß das größere Lauf¬ 
werk keinen Platz im Rechnergehäu¬ 
se findet. Im Falle des Testlaufwerks 
fand ich das jedoch nicht tragisch; ein 
vom Vertreiber angebotenes Acryl¬ 
glasgehäuse erlaubt dem Technik- 
Freak, dem Kopfschlitten des Lauf¬ 
werks bei der Arbeit zuzusehen. 
Fazit; 

Der Käufer erhält mit dem NEC- 
Laufwerk einen fairen Gegenwert für 
den Kaufpreis. Einbau und Inbetrieb¬ 
nahme sind ohne Schwierigkeiten 
durchzuführen. Das Flachbandkabel 
ist fertig vorbereitet, könnte aber 20 
cm länger sein, um die Wahl des Stell¬ 
platzes etwas freier zu gestalten. Die 
stabile Laufwerksmechanik verspricht 
eine lange Lebensdauer des Gerätes. 
Unter dem Namen II) 35 wird übri¬ 
gens ein ebenso anschlußfertiges 
3 1/2"-Laufwerk mit gleicher Kapa¬ 
zität angeboten. 

Preis des ID 55: ca. DM 589,-. 
Preis des passenden Acrylglasgehäu¬ 
ses: ca. DM 30.-. 

Preis des II) 35 ca. DM 489, — . 
Vertrieb: lnnowave Data 
3000 Hannover 1 
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präsentiert 


Autor: Matthias Uphoff 

Das universelle Hardcopy-Programm 
für Schneider CPC 464/664/6128 


...komfortable Menuesteuerung 
für Bildgestaltung 


SHIFT 


21 


INK 


i 


Farben/Raster-Auswahl 


und 


...Hardcopy-Simulation 
auf den Bildschirm 


i ^ /-'*w - I 

'sJr v " 

51 / ; 

...Hardcopies in 
4 verschiedenen 
Formaten 


...beliebige Ausschnitts¬ 
vergrößerungen 


COPYSHOP Im Detail: 

- Hardcopy in 4 (I) Formaten - DIN A4. DIN A5, 13,5 x8,5 cm und 
21,5 x13,5 cm 

- superschnelle Hardcopy-Routine: DIN A4 in ca. 4 Minuten 

- arbeitet in allen 3 Modes 

- Anpaßmenue für JEDEN Epson-kompatiblen Drucker 

- läuft ebenfalls mit den Seikosha-Druckern GP-500 CPC. GP-550 CPC 
und GP-1000 CPC 


- Grafikeditor 

- komfortable Pull-Down-Menues 

- schnelle Fill-Routine 

- beliebige Ausschnittvergrößerungen 

- Bildschirm invertieren 

- selbstrelozierbare Hardcopy-Routinen für eigene Programme 


PEN 2 
PAPER 0 
TRANSP 0 


- Anpassung an Drucker möglich, die mit 1280 Punkten pro Zeile arbei- - neue Save- und Load-Routinen erkennen automatisch Mode und Färb¬ 
ten. z.B, CPA-80 GS werte 

- Okimate ML 182 - Anpassung kann beim Verlag angefordert werden - Freezer - saved auf Tastendruck Screenshots aus laufenden Program- 

- Anpassung auch für Drucker, die die Bitbild-Bytes verkehrt herum men. die anschließend ausgedruckt werden können 
drucken (das MSB unten statt oben). z.B. NEC P2-Pinwriter. 


Und die Weltneuheit: Hardcopy-Simulator auf dem Bildschirm!! 

Sie können sich Ihre Hardcopy vor dem endgültigen Ausdruck auf dem Bildschirm ansehen! 


COPYSHOP ist das ultimative Hardcopy-Programm für alle Schneider Computer. 
Erhältlich auf Kassette (DM 59.-)** und 3"-Diskette (DM 69,-)** 
inkl. ausführlicher Bedienungsanleitung. 

“unverbindliche Preisempfehlung 

* Das aut dem Datenträger mitgelieferte Programm -Sreen Save-, welches beliebige Screens 
auf Disk abspeichert, arbeitet nur nach Entfernen des Vortex-Controllers 

COPYSHOP gibt es im guten Fachhandel oder direkt bei: 

DMV-Verlag, Fuldaer Straße 6, 3440 Eschwege 

BEI DIREKTZUSTELLUNG ZZGL. DM 3.- PORTO/VERPACKUNG; PER NACHNAHME ZZGL NACHNAHMEGEBÜHR 
IN DAS AUSLAND IST NACHNAHME NICHT MÖGLICH 


— Bitte Bestellkarte benutzen — Händleranfragen erwünscht — 
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Ein 

tierisches 

Vergnügen: 

- Das JOYCE-MousePaek - 


Schon lange angedroht, nach einigen 
technischen Problemen jetzt endlich 
ausgercift: die Maus für den JOYCE 
ist da - und lauft und läuft und läuft... 


It’s a long way... 

Am Anfang sah es ja wirklich nicht so 
aus. als ob sich das Tierchen jemals 
bewegen würde. Der Grund dafür 
war. daß sich die neueste Version von 
CP M nicht so ganz mit der Slcuer- 
soflware vertrug, was sicherlich eini¬ 
ge der Anwender der ersten Stunde 
(und Version) genervt haben wird. 
(Das ist halt der Preis dafür, daß man 
immer auf dem neuesten Stand sein 
muß...) Aber inzwischen haben sich 
die Probleme erledigt und das Mou- 
sePack funktioniert bestens. 

Da das Eingabemedium »Maus« in der 
Zwischenzeit bestens bekannt sein 
dürfte, spare ich mir die an dieser Stel¬ 
le sonst beliebten Scherze über Pfle¬ 
ge und Stubenreinheit dieses nicht- 
käsefressenden Nicht-Nagetiers und 
präsentiere hier lieber gleich Fakten. 

Das erste Faktum, mit dem der Inter¬ 
essent konfrontiert wird, ist der Preis 
von 249 DMüusen. Dieser Preis er¬ 
höht sich eventuell noch um den Preis 
für das Schnittstellenmodul, denn ohne 
eine serielle Schnittstelle kommt die 
Verbindung JOYCE-Maus nicht zu¬ 
stande. Für Leute, die nicht schon das 
Modul besitzen, eine sicherlich gro¬ 
ße Preisschwelle, deren Überschrei¬ 
tung angesichts der im folgenden 
beschriebenen Leistungen dennoch 
lohnenswert erscheint. 
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Hardware 

Naja, was soll man über die Hardwa¬ 
re schon groß sagen: eine stabil gebau¬ 
te Zweitasten-Rollkugel-Maus, die 
über eine serielle Schnittstelle an den 
Computer angeschlossen wird. Nichts 
Weltbewegendes also. 

Was jedoch hervorgehoben werden 
muß, ist das wirklich erstklassige De¬ 
sign: Durch ihre abgerundete Form 
liegt sie sehr gut in der Hand und 
schlägt somit in Sachen Bedienungs¬ 
freundlichkeit und Ergonomie bei¬ 
spielsweise die »Faustkeil«-Maus des 
Schneider PC um Längen. 

Auch ist sie, entsprechenden Unter¬ 
grund vorausgesetzt, sehr präzise in 
der Übertragung, ruckartige Bewe¬ 
gungen sollten jedoch vermieden 
werden. 


Software 

Neben der Hardware ist im Preis auch 
ein umfangreiches Softwarepaket in¬ 
begriffen, welches angesichts dessen, 
was sonst so auf dem JOYCE läuft, 
geradezu sensationell erscheint. 

Das Softwarepaket läßt sich in drei 
Teile untergliedern. 

Da wäre zunächst einmal die Tastatur¬ 
emulation. Die gibt es gleich zweimal, 
für LocoScript und CP/M. 

Mittels einer Modifikation im Loco- 
Script-File kann die Cursorsteuerung 
dann wahlweise über Tastatur oder 
Maus erfolgen. Der Vorteil der Maus¬ 
steuerung zeigt sich spätestens dann, 
wenn man mal diagonal in einem Text 
herumfahren möchte — das geht we¬ 
sentlich schneller als mit den Cursor¬ 
tasten. Neben den Cursortasten, denen 
die Mausbewegungen zugeordnet 
sind, lassen sich wahlweise »SPA¬ 
CE/ENTER« oder »EXIT/ENTER« 
auf die beiden Maustasten legen, wo¬ 
mit sich auch hervorragend in den Me- 
nues herumfahren läßt. Noch variabler 
ist die Maus unter CP/M, hier können 
sechs beliebige Tasten auf die Maus 
gelegt werden - allerdings »für im¬ 
mer«. Einmal im Betriebssystem ver¬ 
ankert, liefert die Maus immer die 


gleichen Werte, läßt sich also von 
SETKEYS in keiner Weise beeinflus¬ 
sen. Das ist schlecht, wenn man eine 
andere Belegung wünscht — da hilft 
nämlich nur das Laden eines neuen ge¬ 
änderten Betriebssystems. Anderer¬ 
seits läßt sich auf diese Weise sehr gut 
zweigleisig arbeiten, wenn die Cursor¬ 
tasten beispielsweise Wordstar-Kom- 
mandos liefern, die Maus aber die 
Standard-Werte. (Vielleicht kommt 
demnächst noch ein Utility »SET- 
MOUSE«...) 

Zweitens existiert eine Basic- 
Erweiterung, die sich im wahrsten 
Sinne des Wortes sehen lassen kann. 
Sie kostet den Anwender (neben dem 
Anschaffungspreis natürlich) lediglich 
48 KByte auf der RAM-Disk und bie¬ 
tet das volle Mallard-Basic nebst ei¬ 
ner stattlichen Anzahl von Grafik¬ 
befehlen und Maus-Abfragen. 

Insgesamt stehen 81 neue Basic- 
Befehle zur Verfügung. 

An erster Stelle stehen natürlich die 
reinen Grafikbefehle für Linien, Krei¬ 
se, Rechtecke, Punkte, Füllmuster. 
Drehen, Invertieren von Ausschnitten 
oder des gesamten Bildschirms und 
und und, die ausreichend zur Verfü¬ 
gung stehen, praktisch keine Wünsche 
mehr offenlassen und teilweise CPC- 
kompatibel sind. Zum zweiten gibt es 
viele Befehle zur komfortablen Gestal¬ 
tung von Benutzeroberflächen wie 
Mausabfragen oder Window-Ver¬ 
waltung. So ist es beispielsweise mit 
wenigen Befehlen möglich, ein be¬ 
stimmtes File per Maus auszuwählen 
und von der Diskette zu laden. Freie 
Gestaltung der Bildschirmzeichen und 
deren Größe (es werden übrigens 15 
vordefinierte Zeichensätze mitgelie¬ 
fert, die mittels eines Hilfsprogramms 
auch unter CP/M zugänglich sind) so¬ 
wie eine Menge anderer nützlicher 
Features wie zwei Bildschirme oder 
drei verschiedene Hardcopy-Arten (bis 
hin zu DIN A 2!) in zwei Qualitäts¬ 
stufen runden das positive Bild dieser 
Erweiterung, die darüber hinaus noch 
erstaunlich schnell ist, ab. (Eine Über¬ 
sicht der Basic-Befehle finden Sie 
übrigens in Bild 1.) 
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Die neuen Basic-Befehle: 
Benutzeroberfläche: 

XPOS YPOS DELTAX DELTA Y LKEY 
RKEY SXPOS SYPOS XLIMIT YLIMIT 
CURSORON CURSOROFF CURSOR 
RESTOREON RESTOREOFF MENUE 
OPTIONS FILE 

Grafikbefehle: 

CLG CLS COPYCHR- DRAW DRAWR 
DRAWXOR FRAME GRAPHICS PAPER 
GRAPHICS PEN INKLOCATE MOVE 
MOVER PAPER PENPLOT PLOTR 
PLOTSSPEED INK SYMBOL TAG 
TAGOFF TEST TESTR TIMEVPOS 
WINDOW SCROLLU SCROLLD 
SCROLLL SCROLLR CIRCLE F1LL 
PATTERN RECTANGLE BOX INVERT 
CLW UNDERLINE NOUNDERLINE 
LIGHT EMPHASIZED CHEIGHT 
CWIDTH ITAL1CS STRAIGHT TEXT- 
COPY COPYPOSTER DINCOPY 
SCREEN COPYSCREEN SWAP 
MIRRORH MIRRORV MIRRORRDUP 
MAGNIFY ZOOM SYMBOL SAVE¬ 
SYMBOL LOAD SCREEN SAVE 
SCREEN LOAD QUALITY DRAFT 


Und dann wäre da noch zu guter Letzt 
ein Demoprogramm (neben vielen an¬ 
deren, wie beispielsweise einem mai^s- 
gesteuerten Zeichensatzeditor), 
welches den Wert des MousePack 
noch erheblich steigert. Es handelt sich 
dabei nämlich um ein komplettes Mal¬ 
programm namens CENTAUR, mei¬ 
nes Wissens das einzige Malpro¬ 
gramm für den JOYCE, welches die¬ 
se Bezeichnung wirklich verdient. 
Während objektorientierte Zeichen¬ 
programme wie DR Draw oder MI¬ 
CA die Kreativität des Anwenders 
durch Bindung an geometrische Figu¬ 
ren wesentlich einschränkten, ist nun 
der Zugriff auch auf den letzten Bild¬ 
punkt möglich. Natürlich bequem via 
Maus. Und darüber hinaus perfekt und 
vielseitig (ZOOM, KOPIEREN, LU¬ 
PE und...und...und), obwohl es sich 
bei CENTAUR eigentlich eher um ei¬ 
ne Zugabe handeln sollte. 

Das einzige was noch fehlen würde, 
wäre etwas mehr Farbe, aber daran 


können auch die Programmierer, die 
wirklich ganze Arbeit geleistet haben 
(großes Lob!!!), nichts ändern... 


Dokumentation 

Die Dokumentation ist klein, aber aus¬ 
reichend. Sie erklärt die hard- und 
softwaremäßige Installation des 
Mouse-Pack sowie die neuen Basic- 
Befehle und das Programm CEN¬ 
TAUR sehr gut. Darüber hinaus er¬ 
leichtert die üppige Ausstattung mit 
Demo-Programmen das Einarbeiten 
ganz erheblich. 


Fazit 

Zugegeben, man kann über die Maus 
als das »ultimate« Eingabemedium 
streiten, im vorliegenden Fall jedoch 
glänzen beide Seiten der Münze. 
Wer sich schon immer nach etwas 
mehr Grafik auf dem JOYCE gesehnt 
hat, erhält neben seiner ersehnten 
Grafik-Erweiterung noch ein moder¬ 
nes »Eingabetier«. Und wer schon im¬ 
mer mal Mäuse mit seinem Computer 


dressieren wollte, bekommt auch noch 
ein leistungsfähiges Grafiksystem als 
Zugabe. Den Preis dafür halte ich in 
beiden Fällen für angemessen. (Ideal 
ist es natürlich für jene, die beides 
wollen...) 

Falls Sie diesen Test nicht für ausge¬ 
wogen halten, dann schauen Sie sich 
das MousePack doch mal selbst an - 
ich glaube schon, daß Sie anschließend 
zum Tierfreund werden... 

Facts in Kürze: 

JOYCE MousePack: 

Hard & Softwarepaket 
Hersteller: Hardware: Reis wäre 

Software: Gerdes Imperial 

Software 

— Zweitasten-Rollkugel-Maus, seriell 

— umfangreiche Software: 

T astaturemul ation, 
Grafikerweiterung (Basic), 
Malprogramm 

— Preis: 249 DM (komplett) 

— Vertrieb: Fa. Gerdes, 5300 Bonn 1 

Fa. Reis wäre 

— Bewertung: bei so ziemlich allen 
denkbaren Punkten: 10... 

(M. Anton) 
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Das neue cpc Sonderheft ist da! 


Spiele: 

U.a. Speedy Bricks - tolle Spielidee, hervorragende Grafik und flüssiger Spielablauf sind die 
herausragenden Eigenschaften dieses Action- und Geschicklichkeitsspieles. 

Tipsi - Weltraumabenteuer der Extraklasse! Dieses Arcade-Spiel besitzt eine Super-Grafik, 
insgesamt fünf verschiedene Level und bürgt für eine hohe Spielmotivation. 

Anwendungen: 

U.a. Maskengenerator - ermöglicht das Erfassen und Ändern von Bildschirmmasken. Der 
Benutzer erfa8t seine Konstanten und Variablen direkt am Bildschirm, die anschließend per 
Programm interpretiert und in einer Parametertabelle gespeichert werden. 

3D-Plot - erstellt auf einfache Weise 3D-Grafiken jeder Art. 

3-Axis - dient zur Erstellung und Bearbeitung linearer Gebilde. 

Utilities: 

BASIC-Compiler - arbeitet mit Integer- und Stringvariablen und compiliert BASIC- 
Programme, die mit einem Texteditor bzw. einem Textverarbeitungsprogramm erstellt wurden. 
Macro-Assembler - komfortable Routine zum Erstellen von Assemblermacros unter CP/M. 

Programmiersprachen: 

Wissenswertes und Erfahrungsberichte über C, Comal, Forth, Cobol und dBase II. 

Die auf dem Schneider CPC verfügbaren Compiler werden ausführlich vorgestellt, die Syntax 
erläutert. Beispielprogramme und Literaturhinweise runden das Thema ab. 

Turho-Pascal: 

Die Turbo-Pascal Ecke bietet u.a. das Programm »Sags«, mit dem eine Sprachausgabe (auch 
für Bayrisch) realisiert werden kann (übrigens auch als BASIC-Version veröffentlicht. 

Des weiteren gibt es viele Tips zur Grafikerzeugung, der Symbol-After-Befeh! wird implemen¬ 
tiert und zur Unterhaltung dient das allseits bekannte und beliebte Generationsspiel. 

Mit über 200 Seiten praller CPC-lnformationen, Tips und Programmen das ideale Sammel¬ 
werk für jeden CPC-Anwender. 



Weitere Sonderhefte im Verlag erhältlich 



Sonderheft 1/86: 

Software - Listings - Infos für alle Schneider CPC! 
Sonderheft 1 beinhaltet eine abwechslungsreiche Samm¬ 
lung beliebter und nützlicher Programme aus den Sparten 
Anwendung, Spiel und Tips & Tricks 
Der große DFÜ-Sonderteil zeigt Ihnen alles Wissenswerte 
zur Datenfernübertragung auf und vermittelt Basiswissen. 
Insgesamt 28 aktuelle Listings - Software satt im CPC 
Sonderheft 1/86! 



CP/M 


Hardware: 


CF/Mt 


unti »frit . 

iunx «it iTirin > 


Sonderheft 2/86: 

CP/M - Floppys - Hardware - Schwerpunkte im CPC 
Sonderheft 2. Sie erfahren z.B., wie eine relative Dateiver¬ 
waltung realisiert wird und wie der CPC Daten mit Apple 
und IBM auslauschen kann. 

Die Hardware-Rubrik sorgt für Nachwuchs der Schneider- 
Floppy, ein 35" - Laufwerk läßl sich ohne Probleme an den 
CPC anschließen. Das CPC DOS 3.0 erweitert den Horizont 
der CPC’s um ein Vielfaches und läßt die Programmierer¬ 
herzen höher schlagen. Und - viele Superinfos zu CP/M 
- eine wahre Fundgrube für alle CPC-Besitzer! 


Richten Sie Ihre Bestellungen an: 

DMV-Verlag, FuldaerStr. 6, 3440 Eschwege 

— Bitte Bestellkarte benutzen! — 



Sonderheft 3/86: 

Reviews - Spiele — Anwendungen - ein wahres Hit- 
Sammelsorium birgt das CPC-Sonderheft 3/86. 

Die besten Spielprogramme im Überblick und viele Tips, 
Lösungen und Karten zu Computerspielen- und Abenteu¬ 
ern. Begeistern wird Sie auch der Flugsimulator - ein ech¬ 
ter Leckerbissen zum Eintippen! Fantasy- und Adventure- 
Ireunde werden sich über das erste Rollenspieladventure 
Monstergarten sicherlich genauso freuen, wie die 
Hardware-Freunde über die Echtzeituhr zum Selbstbau. 
Des 'werteren gibt es viele tolle Programme aus den Berei¬ 
chen Spiel. Anwendung und Utilities sowie fundierte Bench- 
te über die effektive Interruptprogrammierung. Da ist für je¬ 
den etwas dabei - das CPC Sonderheft 3/86 ist seit dem 
8. September überall im Handel Und natürlich: Alle Pro¬ 
gramme sind auch auf Diskette oder Kassette erhältlich! 
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Strike Force Horrier 

Hersteller: Mirrorsoft 
Vertrieb: Fachhandel 
Rechner: JOYCE 
Programm: M-Code 
Preis: ca. 60,— DM 

Für Freunde von Flugsimulatoren ist 
mit Strike Force Harrier ein echter 
Leckerbissen auf den JOYCE-Markt 
gekommen. Nachdem mit TOMA¬ 
HAWK der Bereich »Hubschrauber« 
abgedeckt wurde, simuliert S.F.H. ei¬ 
nen Senkrechtstarter. 

Natürlich (leider) geht es nicht ohne 
Ballerei ab... letztendliches Ziel des 
Spiels ist es, sich zu einer »feindli¬ 
chen« Basis durchzuschlagen und diese 
zu vernichten, wobei »feindliche« Bo¬ 
denstellungen und »feindliche« Flug¬ 
zeuge einer hoffnungsvollen 
Pilotenkarriere sehr schnell ein Ende 
bereiten können. Zum Erreichen des 
Ziels ist es allerdings nicht nur mit 
blinder Ballerei getan, etwas Strategie 
sollte auch im Spiel sein, immerhin 
müssen ja die Nachschubwege (eine 
Tankfüllung hält leider nicht ewig) ge¬ 
sichert sein und das ist nicht so 
einfach... 

Wem diese »viel Feind viel Ehr« Men¬ 
talität nicht liegt, der kann auch in ei¬ 
nem speziellen Übungsmodus seinen 
Kunstflugneigungen freien Lauf lassen 
— natürlich im Rahmen der physika¬ 
lischen Gesetze, der bei S.F.H. jedoch 
relativ groß ist (wirklich schwierig 
wird es erst bei der Landung...). 
Neben dem »lockeren« physikalischen 
Rahmen, der auch Anfängern zumin¬ 
dest einen erfolgreichen Start erlaubt, 
kommt auch im sonstigen Umfeld kei¬ 
ne so rechte Simulator-Atmosphäre 
auf, es gibt nämlich nur zwei Übungs¬ 
und einen Kampf-Modus, die durch 
drei Schwierigkeitsgrade variiert wer¬ 
den können. Umweltfaktoren wie 
Nachtflug oder Wetter können nicht 
geändert werden. 

Der Mangel an Optionen wird jedoch 
durch die perfekte grafische Darstel¬ 
lung wettgemacht. Der Cockpit- 
Ausblick präsentiert sich wirklich 
wirklich Düsenjäger-schnell, die In¬ 
strumentenanordnung ist zumeist prak¬ 
tisch und übersichtlich. (Zitat eines 
unabhängigen Testpiloten: »Der ist mir 


fast zu schnell.«). Etwas ungewohnt 
ist die Bedienung über die Tastatur, 
die man jedoch auch recht schnell in 
den Griff bekommt. (Richtig schön 
dürfte es wohl erst mit einem Joystick 
werden — es ist halt doch mehr Ac¬ 
tion als Simulation...) 

Dokumentiert wird S.F.H. in einem 
kleinen englischen Handheft, eine 
Landkarte und eine Referenzkarte ge¬ 
hören ebenfalls zum Lieferumfang. 
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Fazit: 

Ein schnelles, sauber gemachtes und 
grafisch ansprechendes Spiel, aller¬ 
dings mit einem sehr fragwürdigen In¬ 
halt... (M. Anton) 


BOUNDER 

Hersteller: Gremlin Graphics 
Vertrieb: Fachhandel 
Rechner: JOYCE 
Programm: M-Code 
Preis: ca. 40,— DM 

Tja, da war dann noch der kleine 
Tennisball, der nach den letzten 
Meisterschaften übriggeblieben war. 
Und den hat sich nun irgendein 
Tennis-Feind geschnappt und (wahr¬ 
scheinlich aus Rache für das durch 
Überziehen durcheinandergeratene 
Fernsehprogramm) in einen tödlichen 
Parcours gesteckt. Dort hüpft er nun 
herum und muß aufpassen, daß ihm 
durch Kollisionen mit allerlei Unge¬ 
ziefer nicht die Luft ausgeht. Sie als 
Spieler können allerdings durch ent¬ 
sprechendes Manövrieren dem kleinen 
BOUNDER etwas Flughilfe geben. 
Das ist in etwa die Geschichte von 
BOUNDER (Review der CPC- 
Version in Heft 9/86?), das nun auch 
in einer JOYCE-Version vorliegt. So 
trivial es sich anhört, aber einfach ist 
es wirklich nicht, den hüpfenden Ball 
erfolgreich durch alle 10 Level (»174 
scrolling screens of sheer torture...«) 


zu bugsieren — ohne den integrierten 
CHEAT-Modus ist es fast unmöglich, 
über Level 2 hinauszukommen. Die 
Grafik präsentiert sich grün auf grün 
aus der Vogelperspektive und ist zu 
anfang etwas ungewohnt, die Bedie¬ 
nung erfolgt über Tastatur oder Joy¬ 
stick, wobei letzteres wahrscheinlich 
die geeignetere Methode ist. (Hängt 
übrigens ein Schnittstellenmodul samt 
Maus o.ä. am Expansion-Port, ist die 
Tastatur gesperrt. Im Zweifelsfall al¬ 
so Schnittstelle freimachen...) 
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Fazit: 

Ein etwas anderes Geschicklichkeits¬ 
spiel — und nicht gerade einfach! 

(M. Anton) 


TRIVIAL PURSUIT 

Das bekannte Gesellschaftsspiel erlebt 
zur Zeit einen wahren Boom. Nun ist 
Trivial Pursuit auch als Computerspiel 
erhältlich, selbst für den Joyce gibt es 
eine Version. 

Wir haben das Spiel in unseren 
Software-Reviews für Sie getestet, die 
vorliegende Joyce-Version weicht nur 
in einigen Punkten von der des CPCs 
ab. So ist natürlich die grafische Dar¬ 
stellung aufgrund der fehlenden Far¬ 
be nicht vergleichbar, doch haben die 
Programmautoren hier wirklich enor¬ 
mes geleistet. Fatal sind lediglich die 
Soundeffekte (für einige Fragen aus 
TP unerläßlich), doch gibt halt der 
Joyce leider nicht mehr her. 

Alles in allem jedoch eine runde Sa¬ 
che, und als gelungene Abwechslung 
zum Anwendungsalltag des Joyce sehr 
zu empfehlen. 

Nützlicher Nebeneffekt: Das oft ein¬ 
gerostete Allgemeinwissen läßt sich 
spielerisch auffrischen. 

(SR) 
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OLDIES BUT COODYS 


Mal wieder etwas Betagteres! Daß das nicht unbedingt die Sparte »Alt & 
Abgestanden« betrifft, ist doch wohl klar. Also, wir haben uns diesmal 
Obsidian vorgenommen, ein Arcade-Adventure, was trotz seiner zwei 
Jahre, die es schon auf dem Buckel hat, wohl doch noch so manchen vor 
Probleme stellt. Ich habe es auch beinahe einmal aufgegeben, aber 
Freunde, es ist gelöst. 


dahinter. Na, ich hoffe, daß es jetzt 
nicht mehr so schwierig ist, dem 
schwarzen Loch zu entkommen. Falls 
es doch noch Probleme geben sollte, 
wenden Sie sich bitte an den »Heißen 
Draht«, der die Fragen dann an mich 
weiterleitet, aber versuchen Sie es erst¬ 
mal selbst, so schwer ist es nicht! 

(Bernhard Bichmann) 


Bei Obsidian gibt es zwei Schwierigkei¬ 
ten. Zum einen, zu wissen, wo man 
welchen Gegenstand anwendet und 
zum anderen ein paar fiese Roboter, die 
man besser umfliegt, was allerdings 
nicht immer einfach ist. In der neben¬ 
stehenden Karte ist jedes Problem mit 
einer roten und jeder Gegenstand mit 
einer schwarzen Zahl gekennzeichnet. 
Sie müssen also nur jeweils den Zahlen 
nach, zuerst zur schwarzen und dann 
zur roten Zahl fliegen. Da dies nicht 
immer ganz einfach ist, möchte ich hier 
noch zwei Stellen näher beschreiben. 
Zuerst aber etwas Grundsätzliches: 
zum schnelleren Vorwärtskommen 
muß man den Joystick in die jeweilige 
Richtung schräg nach oben stellen. So 
können Sie dann über den Boden 
schweben. Die ersten Schwierigkeiten 
treten schon im Bild neben dem Star¬ 
traum auf. Ohne einen guten Joystick 
kann man bereits hier leicht verzwei¬ 
feln. Wollen Sie von links nach rechts, 
stellen Sie sich auf das Plateau neben 
der etwas längeren Bahn und laufen 
gleich nach dem Gong hinüber. Soweit 
so gut, bisher war’s leicht. Beim Rück¬ 
weg gehen Sie gleich unter dem Robo¬ 
ter durch, wenn er nach oben rüber¬ 
fährt, warten Sie kurz (es kommt auf 
den Standort an) und weichen dann 
blitzartig in das Geschoß nach oben 
aus. 

Noch diffizieler wird es bei der Lazer- 
strecke, die die beiden Hauptteile des 
Asteroiden verbindet. Sie stehen rechts 
am Bildrand, lenken nach oben und ge¬ 
hen in die Diagonale nach links über, 
dann hängen Sie an dem Block links 
fest. Dort fliegen Sie ganz nach oben, 
lenken kurz nur nach links und sofort 
wieder schräg nach oben. So sollten Sie 
eigentlich den Block elegant umflogen 
haben, aber einiges an Übung gehört 
schon dazu. 

Umgekehrt gehen Sie genauso vor, fan¬ 
gen aber gleich an dem Block an und 
umfliegen dann noch die kleinen Stufen 
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Auch diesen Monat haben wir wieder ein volles Programm. Spieltips und 
Karten, die Ihnen hoffentlich auch dieses Mal bei dem einen oder ande¬ 
ren Spiel helfen, auf die richtige Spur zu kommen. Außerdem möchte ich 
Sie an dieser Stelle gleich auf unseren neuen Wettbewerb hinweisen, den 
»BEAT IT«. 

Genaueres darüber lesen Sie bitte auf diesen Seiten unter der Überschrift 
»BEAT IT«, es lohnt sich. 


Roger Milz aus Rösrath hat uns ge¬ 
schrieben. In nächtelanger Arbeit ist es 
ihm gelungen, die wesentlichen Proble¬ 
me bei Nexus zu meistern und möchte 
nun natürlich, daß möglichst viele an¬ 
dere Spieler davon profitieren. 


den sieben Schubladen zu fotografieren 
und wenn ja, wie? 

Soviel zu Nexus. Jetzt wollen wir noch 
ein wenig Wernern, denn zu diesem 
Spiel erreichten uns einige interessan¬ 
te Tips von Matthias Hosch. 


NEXSUS CLUES 


1. Für die 32 Fragen braucht man alle 
128 Teile. Im Gebäude findet man aller¬ 
dings nur 127 Teile. Das 128-te be¬ 
kommt man, indem man den Typ, der 
im Terminal als Informer bezeichnet 
wird, grüßt. Er fragt dann nach der 
Room-Nr. und nach der Teile-Nr. Es ist 
daher sinnvoll, vorher im Editing Ter¬ 
minal nachzusehen, welches Teil fehlt. 
Doch Vorsicht! Man bekommt nur ein 
Teil von ihm. 

2. Der Typ, der ganz am Anfang unten 
links abgebildet ist, ist mit 99,9% 
Wahrscheinlichkeit Tayo. Wenn man 
ihn trifft und grüßt, antwortet er »i’d on 
the side of Money«. Das erklärt natür¬ 
lich, warum er einen dauernd angreift. 

3. Hier nun die Antworten auf die 32 
Fragen: 

1 General Alfredo, 2 The Andean Foot¬ 
hills, 3 Columbian Coffee Export, 4 
Prof. Barraclough, 5 Columbian Gold 
Minig, 6 Ninety five point eight, 7 Six- 
ty four, 8 On Foot, 9 Honduras, 10 Jedi 
Prime, 11 Dracus, 12 In Coffe Grounds, 
13 Senator B. Pluma, 14 Surgical Cor- 
sets of New York, 15 Cuba, 16 Power 
Boat, 17 Tampa Bay, 18 No, 19 The Ma¬ 
fia, 20 Wine Woman and sang, 21 Ga- 
daffi, 22 All Prisoners executed, 23 
Barry Manilow, 24 Carlos Ferdinando, 
25 Washington Post, 26 Central Intel¬ 
ligence, 27 Direct Orders of Alfredo, 28 
Six Percent of consumption, 29 Noon 
after April four, 30 Eldorado, 31 Quay 
West, 32 Four Million Dollars. 

Eine Frage hat Roger allerdings selbst 
noch zu Nexsus: Ist es möglich, den 
Transmitting Room und den Raum mit 


Werner 


Werner fahrt normal Auto: Wenn man 
ganz langsam fahrt, kann man dem 
Bohrer entgehen, dasselbe gilt für 
Jeckel. Für den gemeingefährlichen 
ZSAZ (Zündschlüsselabzieher) gilt ge¬ 
nau das Gegenteil. 

Werners Panik Tour: Da der eine oder 
andere noch Schwierigkeiten mit dem 
Auf- und Ablegen der Gegenstände hat, 
hier nochmal das Patentrezept. 

Ablegen: Feuerknopf und Knüppel 
nach oben. Auswählen: Feuerknopf 
und entsprechende Richtung. Aufneh¬ 
men ist nur möglich, wenn die Hand 
auf ein leeres Feld zeigt. 

Die ersten 35 km: Um an der Mauer 
vorbeizukommen, braucht man die 
Bombe, danach die Tasse Kaffee und 
den Kasten Bier mitnehmen. Der Mag¬ 
net wird benötigt, um die Reißzwecken 
von der Straße zu entfernen. Nach den 
Reißzwecken verliert man eine Schrau¬ 
be, was aber nicht weiter tragisch ist, 
wenn man die zweite Schraube und den 
Schraubenschlüssel bei sich hat. Da¬ 
nach ist darauf zu achten, daß der In¬ 
nensechskantschlüssel an Bord ist, er 
ist bei dem kleinen Teufelchen von¬ 
nöten. 

Im folgenden wird Werner von einem 
Blumentopf attackiert, dem sich aller¬ 
dings mit dem Sturzhelm der Schneid 
abkaufen läßt. Dann kommt Kilometer 
35 und dort ist erstmal Sense. Wie es ab 
hier weitergeht, wird wohl jeder für 
sich herausbekommen müssen, das 
sollte aber kein allzu großes Problem 
sein. So, das wär’s schon wieder für 


diesen Monat. Im nächsten Heft wer¬ 
den Sie, liebe Leser, dann das erste Mal 
beim »BEAT IT« etwas gewonnen ha¬ 
ben. Also Tschüß bis nächsten Monat. 

(HS) 


BEAT IT 

Im letzten Heft hatte ich angekündigt, daß ich Ihnen in 
diesem Heft eine Überraschung präsentieren würde, 
und versprochen ist versprochen. Wie Sie der Über¬ 
schrift sicherlich unschwer entnehmen konnten, heißt 
diese neue Aktion »BEAT IT«. Um es für jene, die der 
englischen Sprache nicht mächtig sind, näher zu erläu¬ 
tern, »BEAT IT« heißt auf gut Deutsch »Ich hab’s ge¬ 
schafft.« Und im vorliegenden Fall bezieht sich das 
»BEAT IT« auf Computerspiele. 

Wer nämlich einen guten Poke, interessante Tips zu 
neuen Spieleo, einen Lösungsweg zu einem bisher un- 
gemeisterten Adventure bietet, kann etwas gewinnen. 
In dieser Rubrik werden von nun an Monat für Monat 
die besten Spieletips und Tricks prämiert. Um es noch 
einmal zu vertiefen: gefragt sind Tips zu kommerziel¬ 
len Spielen. Beispielsweise hätte jemand, dem es ge¬ 
lungen ist, den Cheat Mode bei Spindizzy zu ent¬ 
decken, gute Chancen den »BEAT IT« zu gewinnen. 
»Aber, was gibts nun z.u gewinnen?«, werden Sie sich 
nun fragen. 

Also, wir werden Monat für Monat ein Spielprogramm 
aussuchen, von dem wir der Meinung sind, daß es die 
feinste Neuerscheinung des Monats ist. Von diesem 
Programm werden wir fünf Stück an die Einsender der 
fünf besten Tips verteilen. 

Diesen Monat gibt cs Ledergöttinnen zu gewinnen. Die 
Einsender der drei besten Tips des Monats April erhal¬ 
ten je einmal das neue Infocom Adventure »Leather 
Godesses of Phobos«. Die Preise dieser ersten Runde 
»BEAT IT« hat Aclivision Deutschland zur Verfügung 
gestellt. Ein herzliches Dankeschön also in diese Rich¬ 
tung. 

Zum guten Schluß möchte ich daraufhinweisen, daß 
uns ein Rechtsweg völlig unbekannt ist und außerdem 
ganz und gar nicht in Frage kommt, weil er nämlich 
ausgeschlossen ist. 

Bitte vermerken Sie auf Ihren Einsendungen das Stich¬ 
wort «BEAT IT«. Zusendungen bitte an folgende 
Adresse: 

DMV-Verlag • Postfach 250 ■ 3440 Eschwege 

So, damit wäre alles gesagt. Nun ist es an Dinen. (HS) 


The Silicon Dream 
Trilogy 

Ja, wer kennt sie nicht, der sich schon 
einmal auf die Suche nach irgendei¬ 
nem Kristall gemacht hat, auf einem 
fremden Dschungelplaneten überleben 
mußte oder einen Verrückten daran 
hinderte, ein Siedlerraumschiff in die 
Sonne zu steuern? 

Jawohl, richtig geraten, es sind LE¬ 
VEL 9, die ungekrönten Könige des 
Kassettenparsers, denen wohl niemand 
das Wasser reichen kann. RAINBIRD 
hat drei, etwas in die Jahre gekomme¬ 
ne Adventures, die von der Thematik 
her aufeinander aufbauen, in einem 
Sampler herausgebracht. Es sind die 
Sci-Fi-Adventures SNOWBALL, RE¬ 
TURN TO EDEN und THE WORM 
IN PARADISE. 

Die erfahrenen Adventure-Spieler hö¬ 
re ich schon aufstöhnen und sagen: 
»Nicht die schon wieder! Die habe ich 
doch schon seit 2 1/2 Jahren!«. Tja, 
es gibt trotzdem noch einen gewissen 
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Kaufanreiz, denn die Adventures wur¬ 
den nicht in der alten Fassung belas¬ 
sen, sie wurden komplett überarbeitet 
und in einer EXTENDED VERSION 
herausgegeben. Außerdem liegt noch 
eine 50-seitigc Novelle bei. Es ist 
schon recht schwierig, über drei Spiele 
zu schreiben, die vor zwei Jahren als 
neu gegolten hätten. Also lud ich erst 
einmal SNOWBALL, schnappte mir 
die Novelle und begann zu lesen. 
Vorweg, das unscheinbare kleine 
Büchlein ist ein Meisterwerk der 
Science-Fiction Literatur. Was der 
Autor von »EDEN SONG«, Peter 
McBridge, an Fantasie in Worte um¬ 
gesetzt hat, ist unglaublich. Ich habe 
schon viele bekannte futuristische Bü¬ 
cher gelesen, aber das Büchlein 
schlägt fast alle um Längen. 

Egal, wenn es um einen HAPPYBOT 
geht, der vor einigen Jahren aus dem 
Verkehr gezogen wurde, da jeder vor 
seinen Witzen flüchtete, oder die An¬ 
hänger eines notorischen Trinkerclubs, 
deren Treffen immer donnerstags statt¬ 
fanden, und die ihnen so gut gefallen 
haben, daß sie fortan die anderen sechs 
Tage aus dem Kalender strichen, al¬ 
les ist humorvoll und skurril umge¬ 
setzt. Doch eine kleine Warnung: Das 
Buch ist in komplettem Slang-Englisch 
geschrieben und einem deutschen Nor¬ 
malsterblichen dürfte es kaum möglich 
sein, ohne andauernden Zugriff auf 
das Wörterbuch den »EDEN SONG« 
zu lesen. 

Doch wollen wir die Spiele über dem 
Buch nicht vergessen. Laut Anleitung 
verfügt die EXTENDED VERSION 
über die folgenden drei Spezialbefeh¬ 
le: OOPS, RAM RESTORE und 
RAM SAVE. Mit OOPS kann man ei¬ 
nen fatalen Zug, auch nach dem vor¬ 
zeitigen Ableben von Ihrem Astro¬ 
nauten, ganz einfach zurücknehmen; 
mit RAM SAVE kann man eine Stel¬ 
le im RAM des Computers speichern, 
ohne auf ein externes Speichermedi¬ 
um zuzugreifen und mit RAM RE¬ 
STORE kann man an der mit RAM 
SAVE gesicherten Stelle fortfahren. 
Doch diese Befehle existieren nicht; 
auch die laut Verpackung 600 Illustra¬ 
tionen bestehen anscheinend nur aus 
schwarzer Tinte auf schwarzem 
Grund. Ich glaube fast, daß dies ein 
BUG ist, aber sicher bin ich mir nicht, 


da man nach Eingabe eines Spezial¬ 
befehles mit der lapidaren Meldung: 
»SORRY, WE COULDN’T FIT THAT 
INTO THIS VERSION« abgespeist 
wird. 

Auch die Grundidee der Spiele ist min¬ 
destens genauso interessant wie der 
EDEN SONG. In SNOWBALL geht 
es darum, daß eine unscheinbare Sied¬ 
lerin namens KIM KIMBERLEY 
plötzlich aus ihrem 700 Jahre andau¬ 
ernden Winterschlaf zum Planeten 
ERIDANI E erwacht und erfahrt, daß 
SNOWBALL 9 von einem Verrück¬ 
ten gekapert wurde, dem anscheinend 
sehr viel daran liegt, mit vollem Ka¬ 
racho gegen die Sonne zu semmeln. 
Doch unsere KIM setzt natürlich al¬ 
les daran und verhindert das Chaos 
noch im letzten Moment. Die Moni- 
tore aber zeigen ein anderes Bild: KIM 
KIMBERLEY, wie sie den Maschi¬ 
nenraum mit einer Brandbombe zer¬ 
legt und deswegen zum Tode ver¬ 
urteilt, posthum ins Vakuum befördert 
werden soll. 

KIM gelingt die Flucht, und sie pro¬ 
duziert eine perfekte Bruchlandung auf 
dem unwirtlichsten Planeten, den sie 
sich hätte aussuchen können: EDEN. 

Hier endet SNOWBALL und RE¬ 
TURN TO EDEN beginnt. Die arme 
KIM hat hier nichts weiter zu tun, als 
die Roboterstadt ENOCH zu finden. 

Nichts weiter? Fliegen Sie mal nach 
Eden, und Sie werden merken, wie 
einfach das ist. Nein, nicht genug daß 
sie sich der überaus unfreundlichen 
Flora und Fauna zur Wehr setzen 
muß, auch das hochtechnisierte Ab¬ 
wehrsystem von ENOCH spielt ver¬ 
rückt und erkennt nicht mehr, wen es 
eliminieren soll und schießt so auf 
Freund und Feind. Und als letztes fa¬ 
tales Problem muß KIM die ebenge¬ 
nannte ENOCH-Laser-Abwehr daran 
hindern, das Siedlerraumschiff 
SNOWBALL 9, auf dem sie zum To¬ 
de verurteilt wurde, vor der Zerstö¬ 
rung zu retten, da sich mehr als 
200.000 Siedler im Tiefschlaf auf ih¬ 
re Rettung berufen. Ist dies geschehen, 
kommt das letzte denkwürdige Ereig¬ 
nis der SILICON DREAM TRILOGY 
(diese Bezeichnung stammt aus dem 
EDEN SONG, und wurde von einem 
HAPPYBOT; Sie wissen schon, der 


mit den Witzen, geprägt, der seinen 
Wünschen und Hoffnungen die Be¬ 
zeichnung SILICON DREAMS gab.) 

THE WORM IN PARADISE, auf 
Deutsch soviel wie DIE MADE IM 
SPECK. Dieses Abenteuer findet wäh¬ 
rend der Regentschaft von KIM III 
statt, einer Phase freundlicher Büro¬ 
kratie. Ein echtes Paradies für die ru¬ 
hige Mehrheit, mit Frieden, ohne 
Kriminalität und mit Vollbeschäfti¬ 
gung — in einer 15-Sekunden-Woche, 
luxoriösen Wohnungen und mehr Un¬ 
terhaltung als man nutzen kann. Na¬ 
türlich gibt es niemanden, der das 
System ablehnt - und welcher normal 
denkende Mensch würde das auch? 
Doch plötzlich grassieren unter der 
Bevölkerung seltsame Gerüchte: 
UFOs sollen gesichtet worden sein und 
angeblich intelligente Kreaturen sol¬ 
len in der mächtigen Untergrundstadt 
hausen, von der niemand weiß, warum 
und von wem sie erbaut wurde. Sie 
starten nun als ein ganz friedlicher 
Normalbürger, um diesen Sachen auf 
den Grund zu gehen. 

In ENOCH existiert zu dieser Zeit ein 
seltsames Rechtssystem: Wenn je¬ 
mand eine Straftat begeht, wird er 
nicht verurteilt oder eingesperrt, son¬ 
dern er muß eine gebührenpflichtige 
Verwarnung bezahlen. Besitzt er nicht 
genug CREDITS, findet er sich 
prompt in einem Organspendeinstitut 
wieder, in dem man Körperteile spen¬ 
den muß, bis die Schuld beglichen ist. 
Eine makabere Zukunftsversion, und 
es soll Leute gegeben haben, die mit 
dem Spitznamen LEFTY ins Kranken¬ 
haus »eingewiesen« wurden und als 
SHORTY wieder herauskamen... 
Man kann sich vorstellen, daß es sich 
hinter diesem farbigen Hintergrund 
gut Ad venture spielen läßt. Kassetten¬ 
besitzer, die gerne mal ein Spielchen 
wagen, werden auf dem derzeitigen 
Spielemarkt kaum eine so preiswerte 
Alternative finden, für Diskettenbesit¬ 
zer gibt es schon reizvollere Möglich¬ 
keiten (Ich sage nur: INFOCOM!). 

Alles in allem ein SAMPLER, bei 
dem in den nächsten Monaten nur ganz 
selten einmal Langeweile vorkommt, 
oder um mit HAPPYBOTS Worten zu 
reden: »Kennen Sie den schon... ?« 

(JH/HS) 
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10 Farben in MODE I — wie kann das sein ? 


Das Software-Experiment 

10. Folge: Problem gelöst! 


Zur Erinnerung: In der 7. Folge des 
Software-Experiments wurde die Auf¬ 
gabe gestellt, ein Programm zu ent¬ 
wickeln, das zwei beliebige Wörter 
durch eine Wortkette verbindet, wo¬ 
bei jeweils nur ein Buchstabe ausge¬ 
tauscht werden darf. Als besonders 
harte Nuß hatten wir das Problem prä¬ 
sentiert, auf diese Weise GELD in 
BIER zu verwandeln und weiterhin die 
Frage aufgeworfen, ob es überhaupt 
möglich ist, mit einem Mikrocompu¬ 
ter wie dem CPC-Rätsel dieser Art ge¬ 
nerell zu lösen. Unsere Leser haben 
jedoch nicht lange auf eine Antwort 
warten lassen: Zu unserem Erstaunen 
trafen bereits kurz nach Erscheinen 
von Heft 1/87 die ersten Programme 
zu diesem Thema in der Redaktion 
ein, und nach einigen Tests und Ex¬ 
perimenten mit dem Material bleibt 
nur noch die Feststellung: Das Pro¬ 
blem ist in der Tat gelöst! 

Man sollte wirklich nicht den Fehler 
begehen, das in der Mikrocomputer- 
Szene vorhandene kreative Potential 
zu unterschätzen. Hier werden unbe¬ 
helligt von ökonomischen Zwängen 
oder wissenschaftlichen Zielsetzungen 
auf spielerische Weise Probleme ge¬ 
löst, die Profis mitunter nur ein mü¬ 


des »Dazu brauche ich einen größeren 
Rechner« entlocken. Herr Raab aus 
Nimtofte, Dänemark, der sich eben¬ 
falls mit dem Wortketten-Problem be¬ 
schäftigt hat, schrieb uns dazu: »Die 
tägliche Arbeit mit dem Computer läßt 
einem kaum Zeit für dergleichen, und 
die meisten Computersysteme heutzu¬ 
tage sind so komplex, daß man sichi 
keine Experimente erlauben kann. Da 
ist der Computer zu Hause viel bes¬ 
ser. Er ist zwar etwas langsam, aber 
dafür kann ich damit machen, was ich 
will, wenn das Gerät nicht gerade von 
einem meiner Söhne beschlagnahmt 
ist.« 

Und wer unvorsichtigerweise den Ehr¬ 
geiz der Microcomputer-Freaks her¬ 
ausfordert, muß wissen was er tut; 
Gerade die Firma Commodore, die 
mit ihrem C 64 einiges zu dieser Ent¬ 
wicklung beigetragen hat, gehörte vor 
ein paar Monaten zu den Leidtragen¬ 
den, als die Wundermaschine Amiga 
der Öffentlichkeit präsentiert wurde. 
Wer kennt nicht den berühmten 
»Bouncing Ball«, der als bildschirm¬ 
füllendes Makro-Sprite neue Maßstä¬ 
be bei animierter Grafik setzte? 
Natürlich dauerte es nicht lange, bis 
der lästige Konkurrent Atari auf sei¬ 


nem ST mit einer getreuen Kopie der 
karierten Superkugel aufwarten konn¬ 
te. Gut, beeilte man sich bei Commo¬ 
dore mitzuteilen, man möge aber bitte 
beachten, daß der Atari damit bereits 
zu 90% ausgelastet sei, während der 
Amiga dank seiner Spezialchips ohne 
weiteres noch gleichzeitig ein Prälu¬ 
dium von Bach und eine Partie Schach 
spielen könne. 

Das Argument hatte etwas für sich. 
Als jedoch wiederum nur kurze Zeit 
später auf allen möglichen Mikros bis 
hin zum Sinclair Spectrum der hüpfen¬ 
de Ball auftauchte, zog man es bei 
Commodore vor, der weiteren Ent¬ 
wicklung mit weiser Zurückhaltung zu 
begegnen. Auch für den CPC 464 exi¬ 
stiert übrigens ein verblüffend echter 
»Bouncing Ball«, der einige Feinhei¬ 
ten des Video-Chips geschickt aus¬ 
nutzt, ansonsten aber zu allem 
Überfluß in reinem Basic program¬ 
miert ist. Das schmälert zwar nicht die 
Leistungsfähigkeit des Amiga als Gra¬ 
fikmaschine, zeigt aber, daß die 8 Bit- 
Zwerge immer noch nicht ausgereizt 
sind. Gerade die hardwaremäßigen 
Beschränkungen scheinen die Pro¬ 
grammierer zu immer neuen Taten an¬ 
zuregen, und von daher hätte man es 
sich eigentlich denken können: Die in 
der 7. Folge angedeuteten Zweifel, ob 
eine Lösung des Wortkettenproblems 
auf einem CPC überhaupt möglich ist, 
waren für unsere Leser eine echte Her¬ 
ausforderung. 


Wo liegt das Problem? 

An dieser Stelle soll zunächst einmal 
die Lösung des GELD/BIER-Rätsels 
verraten werden: 

GELD - HELD - HERD - HERR 
- HEER - TEER - TIER - BIER 
So geht’s — und wenn man das Wort 
HIER zuläßt, kommt man sogar noch 
mit einem Schritt weniger aus. Um 
solch ein Rätsel zu lösen, braucht der 
Computer genau wie ein Mensch ei¬ 
nen gewissen Wortschatz. Welchen 
Einfluß der Umfang und die Zusam¬ 
mensetzung der Wortliste hat, be¬ 
schreibt Herr Mühlen weg aus Krefeld: 
»Ob eine Transformation einfach (z.B. 
GERD-WOLF) oder schwierig ist, 
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hängt nur vom Vokabular des Rech¬ 
ners ab. Fehlt beispielsweise das Wort 
GOLD, so wird aus dem einfachen ein 
schwieriges oder sogar unlösbares 
Problem«. 

Ein sehr großer Wortschatz ist aller¬ 
dings noch keine Garantie für überra¬ 
gende Fähigkeiten bei der Suche nach 
Wortketten; schließlich muß der Rech¬ 
ner ja geeignete Wörter herausfiltem. 
Gerade das GELD/BIER-Problem lei¬ 
stet dabei einigen Widerstand. Nach 
welchem System kann man zum Bei¬ 
spiel erkennen, daß die Umwandlung 
in HELD einen geeigneten Ansatz dar¬ 
stellt? Herr Raab stellt die grundlegen¬ 
de Schwierigkeit auf sehr anschauliche 
Weise dar: »Zur Lösung des Problems 
braucht man ein Maß dafür, wie weit 
man zu jedem Zeitpunkt von dem ge¬ 
setzten Ziel, also dem Wort BIER, 
entfernt ist. Die Anzahl der unter¬ 
schiedlichen Buchstaben im Zielwort 
und einem Vergleichs wort ist ein na¬ 
türliches Maß für diesen Abstand. 
Stellt man sich das Zielwort als Berg¬ 
gipfel vor, so kann man die Differenz 
als Luftlinienabstand ansehen. Leider 
haben wir kein Maß für den Weg, den 
wir zurücklegen müssen, wenn wir 
nicht fliegen können, sondern auf ei¬ 
nen Pfad angewiesen sind, d.h. auf be¬ 
nachbarte Wörter«. 

Der Computer als Pfadfinder in un¬ 
wegsamen Gelände — es wird klar, 
daß es wohl kaum ohne einen effekti¬ 
ven Suchalgorithmus geht, der den 
Pfad durch Versuch und Irrtum ermit¬ 
telt. Das erste Programm, das auf die¬ 
se Weise eine Lösung anstrebt, 
erreichte uns bereits Anfang Januar 
und wurde von Herrn Klaas Wede- 
meyer aus Hamburg geschrieben - al¬ 
le Achtung, das ging wirklich flott! Es 
benutzt ein sich selbst aufrufendes (re¬ 
kursives) Unterprogramm, das zu dem 
Startwort ein benachbartes Wort (ein 
Buchstabe ist verschieden) aus der Li¬ 
ste sucht, zu diesem Wort wieder ein 
benachbartes Wort, und so weiter. Ge¬ 
rät das Programm dabei in eine Sack¬ 
gasse, so kehrt es automatisch zum 
vorherigen Schritt zurück und probiert 
eine andere Fortsetzung. Endlosschlei¬ 
fen werden verhindert, indem jeder 
Kandidat daraufhin überprüft wird, ob 
er schon in der Wortkette vorkommt. 


Hochsprachenexperte Martin Schlö- 
ter von PASCAL International hatte 
auch gleich den passenden Fachaus¬ 
druck parat, als ich ihm das Programm 
vorlegte. »Diese Methode, bei dem der 
Computer in seiner eigenen Spur zu¬ 
rückwandert, um eine andere Abzwei¬ 
gung zu finden, heißt Backtracking 
und ist zum Beispiel in PROLOG 
gleich eingebaut«, erläuterte er und 
murmelte dann noch etwas, daß sich 
wie »sowas macht man auch nicht in 
BASIC« anhörte. Bevor er sich wie¬ 
der in die höheren Regionen der Pro¬ 
grammierkunst zurückzog, gelang es 
mir jedoch, ein kleines LOGO- 
Programm abzustauben, daß die Re¬ 
kursion sehr anschaulich grafisch dar¬ 
stellt: 

to Baum : Länge : Winkel :Tiefe 
if : Tiefe = 0 then [stop] 
fd : Länge 
rt -.Winkel / 2 

Baum :Länge * 0.9 -.Winkel :Tiefe-1 
1t : Winkel 

Baum :Länge * 0.9 :Winkel :Tiefe-1 
rt : Winkel / 2 
bk : Länge 
end 


Schildkröte mit Rückwärtsgang 

Dieses Programm malt also einen 
Baum und nutzt dabei die Tatsache 
aus, daß jeder Ast mit seinen Verzwei¬ 
gungen wieder als Baum betrachtet 
werden kann - die Routine braucht 
sich also nur selbst aufzurufen. Star¬ 
ten Sie Ihren LOGO-Interpreter, tip¬ 
pen Sie das Listing ab und geben Sie 
dann z.B. ein: 

Baum 50 60 4 

Der erste Parameter bestimmt die Län¬ 
ge der Äste, der zweite den Öffnungs- 
winkel bei einer Verzweigung und der 
dritte die Rekursionstiefe. Betrachtet 
man den Weg der Schildkröte auf dem 
Bildschirm, so kann man sich gut vor¬ 
stellen, wie der Suchvorgang in der 
Wortliste abläuft: Hat das grafisch ta¬ 
lentierte Reptil einen Endpunkt im 
Baum erreicht, so klettert es wieder 
abwärts, um an einer anderen Stelle 
weiterzumalen, an der noch eine Ver¬ 
zweigung fehlt. 


Das Prinzip sieht auf den ersten Blick 
sehr vielversprechend aus; die ersten 
Versuche mit einer umfangreichen 
Wortliste verliefen jedoch enttäu¬ 
schend: Da ja alle denkbaren Folgen 
ohne Einschränkung untersucht wer¬ 
den, verirrt sich der Rechner ziemlich 
schnell in endlosen Wortketten. Zwar 
garantiert das Verfahren, daß alle exi¬ 
stierenden Lösungen gefunden werden 
(egal wie lang), braucht dazu jedoch 
sehr viel Zeit. Außerdem interessiert 
eine Lösung in 20 Schritten kaum, 
wenn es auch eine in 6 Schritten gibt. 
Was also tun? Doch die Frage war 
bald beantwortet: Nur kurze Zeit spä¬ 
ter traf das Listing von Herrn Müh¬ 
lenweg ein, mitsamt einigen weiteren 
Ideen. In seinem Programm wird der 
Benutzer zu Beginn gefragt, wie vie¬ 
le Schritte die Kette maximal enthal¬ 
ten soll, wodurch zwar eine längere 
Lösung hinter dem Suchhorizont ver¬ 
schwindet, aber dafür die Rechenzeit 
kontrollierbar wird. 

Zusätzlich sieht der Autor noch eine 
weitere Möglichkeit, die Rechenzeit 
zu verkürzen: »Wenn keine Aussicht 
mehr besteht, daß in den verbleiben¬ 
den Suchbaumetagen (bis zum vorge¬ 
gebenen Suchhorizont) noch alle 
ungleichen Buchstaben ausgetauscht 
werden können, kommt das betreffen¬ 
de Wort nicht mehr in Frage. Der 
Suchaufwand wird hierdurch sicher¬ 
lich drastisch reduziert, ohne daß sich 
das Ergebnis ändert«. 

Befinden sich z.B. zwei Schritte vor 
dem Ende der Kette noch drei falsche 
Buchstaben in einem Wort, wird es 
überhaupt nicht mehr in Betracht ge¬ 
zogen. Diese zielgerichtete Suche ver¬ 
meidet in der Tat eine Menge Irrwege; 
störend machte sich nur noch bemerk¬ 
bar, daß das Programm immer wieder 
auf Umwege hereinfallt, wie etwa 

HASE - NASE - VASE 

Von HASE nach VASE hätte auch ein 
Schritt gereicht, wie man sofort sieht. 
Doch auch hier gibt es Abhilfe: Es 
muß nur abgefragt werden, ob sich ein 
Wort von dem vorvorigen Wort der 
Kette in nur einem Buchstaben unter¬ 
scheidet. Ist das der Fall, so liegt of¬ 
fensichtlich ein Umweg vor, und das 
Wort wird verworfen. Zwar vermei- 
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det diese Abfrage nicht alle Umwege 
(sie können sich ja über mehr als drei 
Schritte erstrecken), eliminiert aber 
den häufigsten Fall sehr wirkungsvoll. 
Im Prinzip könnte man den Test auf 
die ganze Kette ausdehnen, es fragt 
sich nur, ob dadurch auf Dauer nicht 
mehr Zeit verbraucht als eingespart 
wird. 

So weit, so gut — faßt man diese Ideen 
zusammen, so erhält man bereits ein 
recht brauchbares Programm. Das 
BASIC-Listing »Wortketten VI« zeigt, 
wie die verschiedenen Elemente rea¬ 
lisiert werden. Als Arbcitsgrundlage 
dient eine Liste vierbuchstabiger Wör¬ 
ter für das WORDMASTER-Pro- 
gramm aus Heft 1/87; sie wird in den 
Zeilen 190 - 250 in das Array wort$ 
geladen, bevor der Benutzer zur Ein¬ 
gabe des Rätsels aufgefordert wird. 

Die Hauptarbeit leistet das rekursive 
Unterprogramm ab Zeile 450. Die ak¬ 
tuelle Suchebene ist in der Variablen 
schritt vermerkt; sie wird bei jedem 
Aufruf um 1 erhöht. Weiterhin exi¬ 
stiert für jede Ebene ein Zeiger, der 
das gerade untersuchte Wort in der Li¬ 
ste markiert. Bevor nun ein Kandidat 
als nächstes Glied der Kette akzeptiert 
wird, muß er einige strenge Prüfun¬ 
gen über sich ergehen lassen. Fällt er 
durch, so springt das Programm so¬ 
fort nach Zeile 890, wo der Zeiger auf 
das nächste Wort gerichtet wird. Ist 
das Ende der Wortliste erreicht, so 
wird die Variable schritt um 1 vermin¬ 
dert, und das Programm kehrt auf die 
vorherige Ebene zurück. 

Erfüllt der Kandidat jedoch alle Kri¬ 
terien, so wird er in Zeile 840 in das 
Array kette$ eingetragen. Beträgt die 
Differenz zum Zielwort (zdif) an die¬ 
ser Stelle nur noch 1, so liegt eine Lö¬ 
sung vor, die mit GOSUB 960 
angezeigt wird; andernfalls ruft die 
Routine sich mit GOSUB 450 selbst 
auf, um die Kandidaten für den näch¬ 
sten Schritt zu untersuchen. Auf dem 
Bildschirm kann man dabei sehr schön 
beobachten, wie das Programm die 
Wortketten auf- und notfalls auch wie¬ 
der abbaut, falls sie nicht zum ge¬ 
wünschten Ziel führen. 


Der Weisheit letzter Schluß? 


Nein, das ist unser Programm mit Si¬ 
cherheit nicht. Um es gut lesbar zu ge¬ 
stalten, wurde bewußt darauf ver¬ 
zichtet, mit allen Tricks und Kniffen 
eine maximale Geschwindigkeit zu er¬ 
reichen. Ambitionierte Bastler können 
hier mit Sicherheit noch einiges her¬ 
ausholen. Aber abgesehen von pro¬ 
grammtechnischen Fragen: Ist dieser 
Algorithmus wirklich die einzige Me¬ 
thode, um das Wortkettenproblem zu 
lösen? Weitere Leserzuschriften be¬ 
weisen, daß es durchaus noch Alter¬ 
nativen gibt. Sie beruhen auf der Idee, 
die Wortliste im Speicher gleich von 
vornherein so zu strukturieren, daß ei¬ 
ne besonders effektive Suche möglich 
wird. 

Herr Maleschka aus Hagen schickte 
uns z.B. ein Pascal-Programm mit fol¬ 
gender Idee: »Die Daten werden im 
Speicher in sogenannten Inseln abge¬ 
legt. Das Besondere an den Wörtern 
einer Insel ist, daß man von jedem 
Wort einer Insel zu jedem anderen 
Wort der Insel mit Sicherheit einen 
Weg findet.« 

Gleich bei der Eingabe eines neuen 
Wortes wird untersucht, ob es in den 
bereits bestehenden Inseln einen Nach¬ 
barn hat. Ist das der Fall, so wird es 
dort einsortiert. Finden sich auf meh¬ 
reren Inseln Nachbarn, so bildet das 
Wort quasi eine Brücke zwischen den 
Wortgruppen, und sie werden zusam¬ 
mengefaßt. Der Vorteil liegt auf der 
Hand: Das Programm kann sehr 
schnell feststellen, ob es überhaupt ei¬ 
ne Lösung gibt (Start- und Zielwort 
müssen sich ja gemeinsam auf einer 
Insel befinden) und kann bei der Su¬ 
che die »überseeischen Gebiete« voll¬ 
kommen außer acht lassen. 

Bei der Strukturierung von Daten tut 
sich BASIC allerdings recht schwer. 
Abgesehen von den unflexiblen Arrays 
werden keine Hilfsmittel geboten, im 
Gegensatz zu Pascal: Mit Records, 
Pointern und verketteten Listen stel¬ 
len komplexe Datenstrukturen kein 
Problem dar. Man kann allerdings 
auch die andere Richtung wählen und 
in die Tiefen der Assemblerprogram¬ 
mierung herabsteigen, wo sich Daten 
ebenfalls sehr flexibel verwalten las¬ 


sen - zwar nicht so komfortabel und 
ohne Sicherheitsgurte, aber dafür sehr 
flott. 

Herr Gerald Steffens aus Harsewinkel 
hat diesen Weg eingeschlagen und ein 
Pogramm eingesandt, daß in der Tat 
beeindruckende Leistungen zeigt. Es 
ordnet die Wortliste im Speicher in 
Form eines Graphen an: Zu jedem 
Wort existiert eine Gruppe von Zei¬ 
gern, die die Speicheradressen der be¬ 
nachbarten Wörter angeben. Schreibt 
man alle Wörter auf ein großes Blatt 
Papier und verbindet benachbarte 
Wörter durch Linien, so hat man die 
Struktur bildlich vor Augen. 

Den Graphen muß der Rechner nur 
einmal zu Beginn aufbauen (außer es 
kommen neue Wörter hinzu), und da¬ 
nach geht die Post ab: Da das Pro¬ 
gramm die benachbarten Wörter nicht 
mehr mühsam suchen muß, sondern 
gleich einen entsprechenden Hinweis 
im Speicher findet, kann es sich in 
Windeseile durch den Graphen hin¬ 
durchhangeln. Weiterhin hilft ein fun¬ 
dierter theoretischer Hintergrund bei 
der Programmierung: »Die reine mat¬ 
hematische Idee, die übrigbleibt, wenn 
man das Problem analysiert, findet 
sich in der Graphentheorie und Kom¬ 
binatorik wieder«, schreibt Herr Stef¬ 
fens und führt in diesem Zusam¬ 
menhang den Algorithmus von Dijk- 
stra an, den er auch in seinem Pro¬ 
gramm als Grundlage benutzt hat. 


Alle auf einen Streich! 


Leider reicht der Platz nicht mehr, um 
die Methode ausführlich zu diskutie¬ 
ren, deshalb nur soviel: Es handelt 
sich im Prinzip um einen Labyrinth- 
Algorithmus, der mit nachtwandleri¬ 
scher Sicherheit den kürzesten Weg im 
Graphen ermittelt, und zwar nicht nur 
zu einem vorgegebenen Ziel wort, son¬ 
dern gleich zu allen erreichbaren 
Punkten. Es ist schon beeindruckend, 
zu sehen, wie das Programm nach 
Eingabe des Startwortes eine Liste al¬ 
ler überhaupt nur möglichen Zielwör¬ 
ter ausspuckt, mitsamt der minimalen 
Schrittzahl, in der sie erreicht werden 
können. Nach Eingabe eines der Wör- 
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Das Databox-Abo kostet: 

Als Kassette für 1/2 Jahr (6 Lieferungen): 

Im Inland und West-Berlin.90,— DM 

Im europäischen Ausland.100.—DM 

Im außereuropäischen Ausland.120— DM 

Als Diskette für 1/2 Jahr (6 Lieferungen): 

Im Inland und West-Berlin.150— DM 

Im europäischen Ausland.160,— DM 

Im außereuropäischen Ausland.180,— DM 


DATABOX: 

— mehr als der übliche Soft¬ 
wareservice 

— bringt ergänzend sämtli¬ 
che Listings der jeweiligen 
Zeitschrift und alle Pro¬ 
grammbeispiele auf Kas¬ 
sette oder auf 3"Diskette. 

— Programme sind, soweit 
systembedingt möglich, 
auf allen drei CPC- 
Modellen lauffähig. Einzel¬ 
heiten entnehmen Sie bit¬ 
te der nebenstehenden 
Aufstellung. 

— erscheint jeden Monat 
und trägt das Titelbild des 
gleichzeitig erscheinen¬ 
den Heftes. 

— der Datenträger zum PC 
Schneider International 
enthält außerdem jedes¬ 
mal ein zusätzliches Bo¬ 
nusprogramm, das nicht 
im Heft abgedruckt ist. 


Einzelbezug: 

Einzelbezugspreise für DATABOX: 

Diskette 3” 24— DM zuzüglich 3— DM Porto/Ver¬ 
packung (im Ausland zuzüglich 5— DM Porto/Ver¬ 
packung). 


Kassette 14,— DM zuzüglich Porto/Verpackung (im 
Ausland zuzüglich 5— DM Porto/Verpackung). 


Für alle CPC's als Kassette und 
3” Diskette. 

Auch als Abonnement mit Preis¬ 
vorteil erhältlich. 

Inhalt der Databox zu Heft 4/87: 


Programm 
Mensch ärgere Dich 
Superplan Init 
Superplan Main 
Animator 
D Ferm 
Format+ 

CAD Kurs 
Hektik 3 fDevpacl 
Soft Experiment 1 
Soft Experiment 2 
Soft Experiment 3 
Bonusprogramm 


464 664 6128 

• • • 

• • • 

• • • 

• • • 


Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungs¬ 
scheck) oder als Nachnahme zuzüglich der Nach¬ 
nahmegebühr (in das Ausland ist Nachnahme 
nicht möglich). 


Preisvorteil durch Databox-Abo: 

Unser beliebter Databox-Service kann ab sofort 
auch im Abonnement bezogen werden Dadurch 
sparen Sie Mühe und haben außerdem noch ei¬ 
nen Preisvorteil gegenüber dem Einzelbezug. 


Als Kassette für 1 Jahr (12 Lieferungen): 

Im Inland und Wost-Berlin.180— DM 

Im europäischen Ausland.200,— DM 

Im außereuropäischen Ausland.240,— DM 

Als Diskette für 1 Jahr (12 Lieferungen): 

Im Inland und Westberlin.300— DM 

Im europäischen Ausland.320— DM 

Im außereuropäischen Ausland.360,— DM 

In den vorgenannten Preisen sind die Versand- 
und Verpackungskosten enthalten Bitte benutzen 
Sie für Ihre Bestellung die Abo-Karte 


PC Schneider international 

Postfach 250, 3440 Eschwege 




Bitte Bestellkarte benutzen 
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ter wird dann prompt die dazugehöri¬ 
ge Kette geliefert. Natürlich hat man 
auf diese Weise auch gleich eine gro¬ 
ße Anzahl potentieller Aufgaben zur 
Auswahl — also das ideale Programm 
für eine Rätselzeitschrift! 

Das Listing besteht aus zwei Teilen. 
Zuerst wird der Lader für den Maschi¬ 
nencode abgetippt und gespeichert. 
Auf Kassette muß direkt danach das 
Hauptprogramm mit dem Dateinamen 


»KETTEV2« folgen, da es automa¬ 
tisch vom ersten Teil nachgeladen und 
gestartet wird. Hier ein paar Erläute¬ 
rungen zu den Punkten des Haupt- 
menues: 

Laden: 

Es kann wahlweise eine Wortliste im 
Binär- oder im ASCII-Format geladen 
werden. LISTE4.DAT für das 
Wordmaster-Programm ist hier eben¬ 
falls geeignet; die Liste wird in der 


DATABOX zu dieser Ausgabe noch 
einmal mitgeliefert. 

Speichern: 

Die Wortliste wird nach Angabe einer 
Dateinummer binär abgespeichert. 
Ausgabe: 

Die gesamte Liste wird auf dem Bild¬ 
schirm ausgegeben. 

Wort einfügen: 

Ein neues Wort kann eingegeben 
werden. 


10 

********************************** 

E13913 

680 

DATA 2B,73,E1,18,CB,2A,00,Al 

C 18263 

20 

** 

Maschinencode 

** 

C14423 

690 

DATA 22,06,Al,ED,4B,04,Al,DD 

E4553 

30 

** zum Wortkettenprogramm V2 

** 

C29783 

700 

DATA 21,00,00,DD,23,ED,5B,IE 

C20833 

40 

** 

(c) 1987 Gerald Steffens 

** 

CI 1363 

710 

DATA A1,41,7E,B7,28,15,1A,BE 

E11583 

50 

********************************** 

C13913 

720 

DATA 20,06,13,23,10,F8,18,OF 

E8393 

60 




C 1173 

730 

DATA 2A,06,Al,06,00,09,22,06 

E 1264 3 

70 MEMORY 

6.A000 


C6723 

740 

DATA Al,18,EO,DD,21,00,00,DD 

E 1994 3 

80 FOR adr=&A120 TO 8.A303 


C7423 

750 

DATA 22,06,Al,C9 

E5083 

90 READ a$:a=VAL( l, &"+a$) :P0KE adr. 

a 

C9623 




100 

sum=sum+a:NEXT 


C20243 




110 

IF sub<> 41189 THEN PRINT"Data 

Error" 

:E C27523 




ND 





10 

*********************************** 

[ 14603 

120 

REM Hauptprogramm starten 


C14153 

20 

********* Wortketten VI ******** 

C 1523 3 

130 

RUN "kette-v2" 


C2913 

30 

* (c) 1987 PC International-Leser * 

C 1564 3 

140 

• 



C 1173 

40 

*********************************** 

[ 1460 3 

150 

DATA 

2A,0A,A1.2B,2B,22,10,Al 


C 12303 

50 


C 1173 

160 

DATA 

2A,00,A1,22,08,A1,2A,OC 


C16423 

60 

***** Initialisierung 

C16073 

170 

DATA 

Al,22,06,Al,18,59,2A,08 


L1014 3 

70 


C 117] 

180 

DATA 

A1,ED,4B,02,A1,AF,ED, 42 


C21513 

80 MODE 1 

C506 3 

190 

DATA 

30,6D,DD,21,00,00,2A,00 


C18093 

90 

INK 0,0=INK 1,12:B0RDER 3 

[10063 

200 

DATA 

Al,ED,4B,02,Al,AF,ED,42 


C21513 

100 

WINDOW#!,1,40,16,25 

E15803 

210 

DATA 

30,29,09,ED,5B,08,Al,DD 


C10653 

110 

OPENOUr'X’ 1 :MEMORY HIMEM- 1 :CLOSEOUT 

E28583 

220 

DATA 

23,ED,4B,04,Al,41, 1A,BE 


C837 3 

120 

DEFINT a-z 

C5533 

230 

DATA 

20,01,OD,13,23,10,F7,OD 


E10993 

130 

DIH uort$(1000),kette®(20),zeiget(20) 

E22613 

240 

DATA 

20, DF,EB,2A,06,A1,DD,E5 


C24893 

140 

kandidat*=SPACE*<4) 

E4753 

250 

DATA 

01,71,23,70,23,22,06,Al 


[13893 

150 

vorher*=SPACE*(4) 

C767] 

260 

DATA 

EB,18,CE,ED,4B,04,A1,2A 


C7903 

160 

’ 

E 117] 

270 

DATA 

08,Al,09,22,08,Al, 2A, 06 


C 14273 

170 

****** Wortliste laden 

E495 3 

280 

DATA 

A1,36,00,23,36,00,23,36 


C12433 

180 

’ 

C 1173 

290 

DATA 

00,EB,2A,0A,A1,73,23,72 


C 10083 

190 

OPENIN" liste4.dat" 

C23863 

300 

DATA 

23,22,OA,Al,EB,23,36,FF 


C13253 

200 

1 imit=0 

C7773 

310 

DATA 

23,36,FF,23,36,00,23,36 


C8263 

210 

WHILE NOT EOF 

C 18403 

320 

DATA 

00,23,22,06,Al,18,87,2A 


C 13403 

220 

1imit=llnit+1 

l 10673 

330 

DATA 

0A,A 1,2B,36,00,2B,36,00 


C12703 

230 

INPUT#9,uort*(limit) 

C8B4 3 

340 

DATA 

2A, 06’, A 1,2B, 2B, 2B, 36, 00 


C18633 

240 

WEND 

E390 3 

350 

DATA 

2B,36,00,2B,22,OE,A1,2A 


C 15583 

250 

CLOSEIN 

C752 3 

360 

DATA 

OC,A1,ED,4B,OE,A1,AF,ED 


C8823 

260 

* 

E1173 

370 

DATA 

42,30,20,09,ED,4B,10,Al 


C 13693 

270 

’***** Eingabe des Problems 

E13923 

380 

DATA 

23, 23,23,23,23,5E,23,56 


C 18013 

280 

1 

E 1173 

390 

DATA 

23,7A,B3,28,E5,2B,2B,EB 


C16233 

290 

CLS 

C913 

400 

DATA 

29,09,7E,12,13,23,7E,12 


C10303 

300 

INPUT"Erstes Kort: *,Startwort* 

L 12433 

410 

DATA 

EB,18,E9,2A,IC,Al,29,ED 


[13383 

310 

INPUT"Letztes Wort: ".zieluort* 

C 10813 

420 

DATA 

4B, 10,A1,09,5E,23,56,EB 


[16873 

320 

startuort*=UPPER*(Startwort®) 

C30193 

430 

DATA 

36,01,23,36,00,23,36,00 


C 1254 3 

330 

zie1 wort®=UFPER®(zieluort®) 

C18263 

440 

DATA 

2B,2B,22,1A,A1,23,5E,23 


C 13723 

340 

INPUT"Schritte maximal: ".maxschritt 

C41793 

450 

DATA 

56,23,ED,53,18,Al,23,23 


C 15033 

350 

LOCATE 30,IsPRINT startuort* 

C 19563 

460 

DATA 

5E,23,56,23,7A,B3,28,2C 


C15133 

360 

schritt=0 

[7013 

470 

DATA 

1A,B7,20,F4,22,16,A1,2A 


C13893 

370 

kette*(0)=startuort® 

E13313 

480 

DATA 

18,Al,23,13,1A.4F,13,1A 


[9663 

380 

GOSUB 450 

[954 3 

490 

DATA 

47,AF,ED,42,30,11,09,1B 


C895 3 

390 

LOCATE 1,14 : PRINT“Fert ig.‘. . bitte ein 

[34173 

500 

DATA 

7D, 12, 13,7C, 12, 13,3A, 1A 


C9123 

e Taste druecken“; 


510 

DATA 

Al, 12, 13,3A, 1B, Al, 12,2A 


t 17633 

400 

WHILE INKEY®=" 11 : WEND 

[ 16073 

520 

DATA 

16,Al,18.CC,21,FF,FF,22 


C 17283 

410 

GOTO 290 

[4113 

530 

DATA 

12,Al,23,22, 14,A1,2A,10 


C 12163 

420 

• 

[1173 

540 

DATA 

A1,23,23,5E,23,56,23,7A 


C8353 

430 

’***** rekursiv Wortkette suchen 

[21653 

550 

DATA 

B3,28, 1F, 1A,B7,20,F4, E5 


C 10923 

440 

• 

[117] 

560 

DATA 

13,1A,6F,13,1A,67,ED,4B 


C 18093 

450 

schritt=schritt+1 

[12043 

570 

DATA 

12,A1,AF,ED,42,30,08,09 


C 10023 

460 

zeiger(schritt)=l 

C10873 

580 

DATA 

22,12,Al,ED,53,14,Al,El 


[13473 

470 

MID®(kandidat®,1)=vort$(zeigertschritt 

[23113 

590 

DATA 

18,D9,2A,14,A1,7C,B5,28 


C13723 

) ) 



600 

DATA 

07,2B,2B,36,01,C3,OA,A2 


C19183 

480 

MID*(vorher®,l)=kette$(schritt-l) 

[15313 

610 

DATA 

2A,10,Al,23,23,22,OA,Al 


[ 17753 

490 

• 

[1173 

620 

DATA 

5E,23,56,23,7A,B3,C8, 13 


C11753 

500 

'Differenz zum vorherigen Wort =1 ? 

[32853 

630 

DATA 

13, 13, 1A,4F, 13, 1A, 47, Bl 


[13273 

510 

• 

[1173 

640 

DATA 

28,EE,E5,D5,2A,0A,A1.5E 


C15303 

520 

vdif =0 

[5523 

650 

DATA 

23,56,23,EB,AF,ED,42,EB 


C594 3 

530 

FOR i=l TO 4 

E4503 

660 

DATA 

20,F5,ED,4B,OA,A1,AF,ED 


E 15273 

540 

IF MID®(kandidat®,i,l)<>MID*(vorher®,i 

[38513 

670 

DATA 

42,CB,3C,CB,ID,Dl,EB,72 


C6503 

, n 

THEN vdif=vdif +1 
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550 NEXT 

C35Q3 

290 POKE 8.A 104, wort 1 

[6463 

560 IF vdifOl THEN 890 

El 1633 

300 POKE 8.A 105,0 

[4273 

570 ’ 

E 1173 

310 ’ 

[1173 

580 'Kann das Ziel poch erreicht werden? 

C23983 

320 ****** Hauptmenue,Tastaturabfrage 

[19483 

590 ’ 

C 1173 

330 ’ 

CI 173 

600 zdif=0 

C4253 

340 CLS:PRINT 

C3563 

610 FOR i=l TO 4 

C 450 3 

350 PRINT " S - Speichern einer Wortli 

C38373 

620 IF MID*(kandidat$,i,1)<>MID$(zie1 wort* 

C48413 

ste":PRINT 


, i, 1) THEN zdif=zdif+l 


360 PRINT " L - Laden einer Wortliste" 

[23133 

630 NEXT 

[3503 

:PR INT 


640 IF zdif>»axschritt-schritt THEN 890 

[21563 

370 PRINT * A - Ausgabe der ganzen Wor 

[30813 

650 ' 

[1173 

11iste":PR INT 


660 'Wurde das Wort bereits benutzt? 

[ 17443 

380 PRINT " W - Wort in Liste einfuege 

[47663 

670 ’ 

[1173 

nPRINT 


680 FOR i=0 TO schritt-1 

E 12603 

390 PRINT " K - Korrektur, Wort ausuec 

C 45823 

690 IF kandidat*=kette*(i) THEN 890 

C 13433 

hseln":PRINT 


700 NEXT 

[3503 

400 PRINT " E - Einstieg ins Suchprogr 

C45413 

710 ’ 

[1173 

anm":PRINT 


720 'Ist das Wort ein Umieg? 

[13423 

410 kflag=0 

C5503 

730 ’ 

[1173 

420 a*=UPPER$(INKEY*) 

C7893 

740 IF sehritt<2 THEN 830 

[19563 

430 IF a*="" THEN 420 

[5833 

750 udif=0 

[6313 

440 IF a*="S‘" THEN 1560 

C9753 

760 FOR i=l TO 4 

[4503 

450 IF a$="L" THEN 1700 

[980 3 

770 IF MID*(kandidat$,i,l)OMID*(kette*(sc 

[50283 

460 IF a*="A" THEN 1230 

CI 1233 

hritt-2),i,1) THEN udif=udif+1 


470 IF a*="W" THEN 1360 

[12313 

760 NEXT 

[3503 

480 IF a*="K” THEN kf lag=l:G0T0 1360 

C 12803 

790 IF udif=1 THEN 890 

[ 1007 3 

490 IF alO'E" THEN 420 

C13303 

800 ’ 

[1173 

500 ’ 

CI 173 

810 'Wort als naechstes Glied der Kette 

[24573 

510 '***** Eingabe des Startwortes 

C15023 

820 ’ 

[1173 

520 ’ 

C1173 

830 LOCATE 30,sehritt+1:PRINT kandidat* 

[24353 

530 text*="Eingabe des Startuortes : " 

[38573 

840 kette*(schritt)=kandidat$ 

[28493 

540 PRINTtPRINT text$;:INPUT a$:PRINT 

[ 19713 

850 IF zdif=l THEN GOSUB 960 ELSE GÜSUB 45 

[21523 

550 a*=UPPER*(a*> 

[5333 

0 


560 IF a*="" THEN 340 

[8073 

860 ' 

[ 1173 

570 IF LEN(a$) < >uort1 THEN PRINT "Falsche 

[35833 

870 'Neues Wort probieren 

[11093 

Wortlaenge":G0T0 540 


880 ' 

[ 1173 

580 GOSUB' 1120 

[8593 

890 IF zeigerfschritt)<1imit THEN zeiger(s 

[60013 

590 IF c=0 THEN PRINT "Wort ist nicht in d 

C81183 

Chritt)=zeiger(schritt)+l:G0T0 470 


er Liste enthalten":G0T0 540 


900 LOCATE 30,sehritt+1:PRINT SPACE*(4> 

[25153 

600 start*=a$ 

C880D 

910 sehritt=schritt-1 

[12163 

610 PRINT" Einen Moment bitte..." 

[23233 

920 RETURN 

[5553 

620 POKE 8<A 1 IC, d : POKE &AllD,e 

C 17563 

930 ’ 

[ 1173 

630 CALL 8.A120 

C6293 

940 ’SUB Loesung ausgeben 

[11113 

640 GOTO 980 

C4963 

950 ' 

[ 1173 

650 ’ 

[1173 

960 FOR i=0 TO schritt 

[ 12663 

660 text$="Eingabe des Endwortes : 11 

C34453 

970 PRINT#l,kette$(i);" "; 

[14833 

670 PRINT:PRINT text$;:INPUT a$:PRINT 

C19713 

980 NEXT 

[3503 

680 a*=UPPER$(a$) 

C5333 

990 PRINT#1,zielwort* 

[337 3 

690 IF a*="" THEN 530 

C7853 

1000 RETURN 

[5553 

700 IF LEN(a$) <>wort1 THEN PRINT "Falsche 

C35653 



Wortlaenge":G0T0 670 




710 GOSUB 1120 

[859 3 



720 IF c=0 THEN PRINT "Wort ist nicht in d 

C 8196 3 



er Liste entha1ten“:GOTO 670 




730 endwort$=a$ 

[4923 



740 k=0 

C 1893 



750 GOTO 820 

C320 3 

10 ’*********************************** 

[ 14603 

760 ’ 

C 1173 

20 ’** Wortketten V2 - Haüptprograma ** 

[10973 

770 minwert=PEEK(adr+1)+256*PEEK(adr +2) 

C25603 

30 ’** (c) 1987 Gerald Steffens ** 

[11363 

780 IF minwert=0 THEN 870 

C6813 

40 ’*********************************** 

[14603 

790 c=PEEK(adr+3)+256*PEEK(adr+4) 

C26863 

50 ' 

[1173 

800 IF c=0 THEN PRINT "Es existiert kein W 

C68083 

60 ****** Initialisierung 

[16073 

eg von ";start$;" nach ";endwort$;GOTO 


70 * 

[1173 

660 


80 MODE 2 

[5133 

810 ’ 

C 1173 

90 MEMORY 8.27FF 

[3383 

820 b=stapel+2*c-2 

[23363 

100 ZONE 8 

[5333 

830 adr=PEEK(b)+256*PEEK(b+1) 

C21053 

110 DEFINT 1 

[394 3 

840 liste(k)=c 

[6253 

120 DIM 1iste(90) 

[554 3 

850 k=k+1:GOTO 770 

[5603 

130 anpos=8.2800 ’start arbeitsfeld 

[20433 

860 ’ 

[1173 

140 stapel=8.7100 ’start punktadressen 

[ 1794 3 

870 FOR i=k-l TO 0 STEP -1 

C596 3 

150 stwl=33024 ’start Wortliste 

[ 16463 

880 j = liste <i) 

[ 10133 

160 enul=stwl 'ende Wortliste 

C10563 

890 a=stul+wortl*(j-1) 

C23073 

170 antest=&A310 ’hi1fsspeicher fuer worts 

[367 3 

900 PRINT " - 

[5893 

uche 


910 FOR d=0 TO wort 1-1 

C12463 

180 wortl=4 ’wortlaenge 

[13853 

920 PRINT CHR*(PEEK(a+d)); 

C 19383 

190 POKE enwl.O 

[8963 

930 NEXT:PRINT " - "; 

[9683 

200 b=INT(stwl/256):c=stwl-256*b 

[9833 

940 NEXT:PRINT:PRINT 

C10093 

210 POKE &A100,c:POKE &A101,b 

[11973 

950 PRINT "Laenge der Wortkette :";k 

[26563 

220 POKE 8.A 102, c: POKE 8«A103,b 

[8073 

960 GOTO 660 

C3693 

230 POKE 8tA IOC , anpos MOD 256 

[ 17253 

970 ’ 

[1173 

240 POKE 8,A10D,anpos\256 

[11943 

980 PRINTsPRINT " Liste der von > “;star 

C93223 

250 POKE 8.A10A, Stapel MOD 256 

C20473 

t$; " < aus erreichbaren Worte und die dazu 


260 POKE 8. A 10B, stape 1 \256 

[ 14743 

gehoerige Laenge":PRINT 


270 POKE 8tA 1 IE, 8t 10 

C5833 

990 c=0 

C3483 

280 POKE StA 1 IF, 8.A3 

[5653 

1000 b=stapel+c+c 

C20313 


4’87 PC 119 






Serie 


1010 

adr=PEEK(b)+256*PEEK(b+1) 

[21051 

1550 

’ 


[1173 

1020 

IF adr=0 THEN PRINT‘-GOTO 660 

C 1978 3 

1560 

PR INT:PRINT "Speichern ? (j /n)" 

[ 18993 

103C\ 

IF PEEK(adr)=0 THEN 1100 

C19913 

1570 

a$=UPPER$(lNKEY$) 


C789 3 

1040 

d=stwl+uortl*c 

C22963 

1580 

IF a*="N" THEN 340 


[935 3 

1050 

FOR a=d TO d+wortl-1 

[22853 

1590 

IF a$<>"J" THEN 1570 


[ 12803 

1060 

PRINT CHR$(PEEK(a!); 

C22013 

1600 

PRINT:INPUT "Dateinummer: ",nr 


[20463 

1070 

NEXT 

[350 3 

1610 

b=INT(enwl/2561:c=enul-256*b 


C22643 

1080 

m inuert=PEEK(adr+1)+256*PEEK ( adr+2) 

[25603 

1620 

POKE stul-1,b:POKE stul-2,c 


[ 13773 

1090 

PRINT " - " iminuert+1, 

[ 19063 

1630 

MEMORY 8.37FF 


[5703 

1100 

c=c+1:GOTO 1000 

[13683 

1640 

SAVE "LISTE"+HEX$(nr),b,stw1-2 

,enul-s 

[26333 

1110 

1 

[ 1173 

twl +2 



1 120 

b=antest 

C977 3 

1650 

CLOSEOUT:MEMORY &27FF 


[18313 

1130 

FOR a=1 TO uortl 

[707 3 

1660 

GOTO 340 


[4643 

1140 

POKE b,ASC(MID$(a*,a, 1)):b=b+ 1 

[13693 

1670 

* 


[1173 

1150 

NEXT 

[3503 

1680 

****** Laden einer Wortliste 


C 12393 

1160 

CALL 8.A2CD 

[6193 

1690 

• 


[ 1173 

1170 

d = PEEK (&.A 106) : e=PEEK (&A 107) 

[28173 

1700 

PR INT:PRINT "Laden 7 (j /n)" 


C23133 

1180 

c=d+256*e 

[9633 

1710 

a$=UPPER$(INKEY$) 


C789 3 

1190 

RETURN 

[5553 

1720 

IF a$="N" THEN 340 


[9353 

1200 

’ 

[1173 

1730 

IF a$< >"J" THEN 1710 


[ 12523 

1210 

****** Woerter anzeigen 

[15843 

1740 

PRINT:PRINT "Ascii oder Binaer 

(A/B) 

C28663 

1220 

’ 

[1173 

o» 




1230 

CLS:c=0 

[3283 

1750 

a$=UPPER$(INKEYSO 


[789 3 

1240 

FOR a=stwl TO enul-1 STEP wortl 

[20933 

1760 

IF a$="A" THEN 2010 


[9533 

1250 

c=c+1 

[7013 

1770 

IF a$<>"B" THEN 1750 


C 11973 

1260 

FOR b=0 TO wort 1-1 

[968 3 

1780 

PRINT:INPUT "Dateinummer: ",nr 


[20463 

1270 

PRINT CHR*C PEEK(a+b)); 

[20683 

1790 

MEMORY &37FF 


[570 3 

1280 

NEXT:PRINT,:NEXT 

t 18323 

1800 

LOAD "LISTE"+HEX$(nr) 


[ 14983 

1290 

PRINT:PRINT:PRINT "Anzahl Worte in de 

[43783 

1810 

CLOSEIN:MEMORY &27FF 


[8013 

r Liste:";c:PRINT 


1820 

c=PEEK(stul-2):b=PEEK(stul- 1 ) 


[2877] 

1300 

PRINT"Eine beliebige Taste druecken.. 

[34293 

1830 

POKE &A 102, c : POKE B,A103,b 


[807 3 

. 11 



1840 

enul=256*b+c:POKE enul,0 


[20653 

1310 

WHILE INKEY$="":WEND 

[ 16073 

1850 

GOTO 1230 


[3653 

1320 

GOTO 340 

[4643 

1860 

• 


[ 1173 

1330 

’ 

[1173 

1870 

bx=stwl+wortl*Cc-l) 


C10923 

1340 

****** Korrektur & Einfuegen 

[ 19053 

1880 

PRINT:INPUT "Bitte Ersatzuort 

eingebe 

[39273 

1350 

’ 

[1173 

n " ;a$ 


1360 

IF kflag=0 THEN PRINT:INPUT "Bitte ei 

[56843 

1890 

k$=UPPER$(a$) 


[5333 

n Wort eingeben: “,a$ 


1900 

IF a$="" THEN 1880 


[5903 

1370 

IF kflag=l THEN PRINT:INPUT"Bitte das 

[60383 

1910 

IF LEN(a$ lOwortl THEN PRINT " 

Falsche 

[35353 

auszuwechselnde Wort eingeben”;a$ 


Wortlaenge":GOTO 1880 



1380 

a*=UPPER$(a$):IF a$="" THEN 340 

[ 15763 

1920 

GOSUB 1120 


[8593 

1390 

IF LEN(a$)<>wort1 THEN PRINT:PRINT "F 

[52583 

1930 

IF cOO THEN PRINT "Wort schon 

in der 

[41633 

alsche Wortlaenge":G0T0 1360 


Liste vorhandenGOTO 1880 



1400 

GOSUB 1120 

[8593 

1940 

FOR a=l TO wortl 


[7073 

1410 

IF c=0 AND kflag=1 THEN PRINT:PRINT " 

C45043 

1950 

POKE bx,ASC!MID$(a$,a,1)):bx=bx+l 

[26093 

Wort 

nicht in der Liste vorhanden":GOTO 13 


1960 

NEXT 


[3503 

60 



1970 

GOTO 340 


[464 3 

1420 

IF cOO AND kf lag= 1 THEN 1870 

[15483 

1980 

’ 


C1173 

1430 

IF cOO THEN PRINT: PRINT "Wort schon 

[77383 

1990 

****** Laden einer ASCII-Datei 


[ 14803 

in der Liste vorhandenGOTO 1360 


2000 

’ 


[ 1173 

1440 

b=enul 

[11183 

2010 

PRINT:PRINT "Laden von LISTE4. 

DAT - 

[54233 

1450 

FOR a=1 TO wortl 

[707 3 

einen Moment bitte...":PRINT 



1460 

POKE b,ASC(MID$(a$,a, 1)):b=b+ 1 

[ 13693 

2020 

MEMORY &37FF:OPENIN "LISTE4.DAT" 

[24983 

1470 

NEXT 

[3503 

2030 

stx=stul:PRINT HEX$(stx) 


[ 1298 3 

1480 

enu1=b:POKE b,0 

[79 3 

2040 

WHILE NOT EOF 


[ 18403 

1490 

b= I NT(enw1/256):c=enu1-256*b 

[22643 

2050 

INPUT #9,a$ 


[5953 

1500 

POKE &.A 102, c: POKE 8,A103,b 

[807 3 

2060 

FOR b=l TO uortl 


[15713 

1510 

PRINT:PRINT 11 ";a$;" wurde eingef 

[26923 

2070 

POKE stx,ASC(MID$(a$,b,1)) 


[ 15743 

uegt 



2080 

stx=stx+1:NEXT sWEND 


[ 18873 

1520 

GOTO 1360 

[4113 

2090 

CLOSEIN:MEMORY &27FF 


[8013 

1530 

’ 

[ 1173 

2100 

b=INT(stx/256):c=stx-256*b 


[ 16033 

1540 

****** Speichern der Wortliste 

[ 13683 

2110 

GOTO 1830 


[3893 


Korrektur: 

Ein falsches Wort wird gegen das rich¬ 
tige ausgetauscht. 

Einstieg ins Suchprogramm: 

Eingabe des Start- und Zielwortes. 
Zurück ins Hauptmenue kommt man 
durch Drücken von ENTER ohne ei¬ 
ne vorherige Eingabe. 

Damit liegt nun ein nahezu perfektes 
Wortketten-Programm vor, und es 
bleibt eigentlich nur noch, allen Le¬ 
sern zu danken, die - genannt oder 
ungenannt — in ihren Beiträgen das 
Problem von allen Seiten beleuchtet, 
analysiert und schließlich gelöst ha¬ 


ben. Durch ihre tatkräftige Mithilfe ist 
diese Folge des Software-Experiments 
erst möglich geworden. Bevor der 
Vorhang fällt, soll aber noch ein ver¬ 
blüffender Trick vorgestellt werden, 
den sich ebenfalls Herr Steffens aus¬ 
gedacht hat. Der Sreenhot auf der 
Seite 114 zeigt die bekannten 
Apfelmännchen-Strukturen (siehe 1. 
Folge) und wurde von einem CPC auf¬ 
genommen. Auf den ersten Blick bie¬ 
tet es nichts Neues, doch bei näherem 
Hinsehen wird der Fachmann stutzig: 
Ohne Zweifel wurde das Bild in MO¬ 
DE 1 erzeugt, stellt aber 10 Farben 


gleichzeitig dar! Sieht man das Pro¬ 
gramm bei der Arbeit, so wird sofort 
klar, daß es ohne die bekannten Ver¬ 
fahren wie Pixelraster oder Screen- 
Split auskommt, und selbst mit allen 
Wassern gewaschene CPC-Speziali 
sten verfallen hier in tiefes Grübeln: 
»Wie zum Teufel hat er das bloß 
gemacht?« 

Nun, wir werden sehen — vielleicht 
verrät uns der Autor den Trick in ei¬ 
ner der nächsten Ausgaben von PC In¬ 
ternational ... 

(M. Uphoff) 
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ProSoft-Preise liegen richtig! 

© 02 61/40 47-1 • Telex 862476 PSOFT 

Günstige Möglichkeit der Fianzierung durch Ratenkredit. Fordern Sie die Unterlagen an. 

Wir suchen ständig günstige Einkaufsquellen für die angebotenen und neue innovative Produkte. 

Schneider - Schneider EPSON - EPSON - EPSON Centronics GLP 

incl. serielle und parallale Schnittstelle, aqq 
incl.Tractor 

Plantron - Plantron - Plantron 


Schneider 464 mit grünem Monitor 
Schneider 464 mit color Monitor 


A 


Schneider 6128 

mit grünem Monitor 

DM 898,— 

Schneider 6128 mit 
Color-Monitor 1498,- 
DDI-1 448,- FD—1 448,- 

MP-1 119,- MP-2 139,- 



Joyce PCW- 8256 

DM 1548,- 

FD-21 MB Laufwerk 

DM 598,- 

Joyce + PCW- 8512 

DM 2098,- 


DMP-2000 528,- 


0MP-3000 558,- 


DruckerKabel, für alle Drucker mit Centro 
nics-Schnittst. an den Schneider 6128 flUf 39,- 


3” Disketten für Schneider 

10 Stück 50 Stück IOOSWck 


Maxell 


TV 


330,- 


650,- 


Disketten-Software für alle Schneiders-Produkte 
preiswert a. Anfrage Bitte fordern Sie die Liste an. 


FX-BOO 

937,- 

FX-1000 

1208,- 


LQ-800 1479,- LQ-1000 1929,- LQ-2500 2578- 
IX-800 1579- EX-800 1319,- EX-1000 1649,- 

LX-86 689,- 

Citizen - Citizen - Citizen 

| LSP-120D incl.Tractor 4487-1 

LSP-10 548,- MSP-10 e 698,- MSP-t5e 848,- 
MSP-20 948,- MSP-25 1048,- HQP-45 2098,- 

NEC - NEC - NEC - NEC 


P 5 2222,- 

P 6 1098,- P 7 

1398,- 

P 6 color 1398,- P 7 color 

1648,- 

P 6 seriell 1498,- P 7 seriell 

1898,- 

P 6 seriell color 

1698,- 

P 7 seriell color 

2198,- 

Pin-Feed-Tractor für P 6 

145,- 

Bidirektionaler Tractor für P 6 

348,- 

Cut-Sheet-Feeder für P 6 (Einzelblatteirz^g) 

449,- 

Pin-Feed-Tractor für P 7 

278,- 

BidirektionalerTractor für P 7 

398,- 

Cut-Sheet-Feeder für P 7 

598,- 


Brother - Brother - Brother 


M-1109 

M-1509 

M-1709 


499,- 
999 - 
1199,- 


M-1409 
M-2024 L+ 
HR-35 DD 


799, 

2098, 

2498, 


Schneider^PC 

PC MM/SD 1798,- PC MM/HD 20 {Seagate 65 ms) 2598,- 

PC MM/DD 2098,- PC MM/HD 20 3190,- 

PC CM/DD 2498,- PC CM/HD 20 (Seagate 65 ms) 2998,- 

PCCM/HD20 3648,- Vortex PC 1512 20 MB-Drive Ca-d 1198,- 

Speicherervveteiung auf 640 K3 RAM 148,- 


Tandon - Tandon - Tandon 

PC 2998,- XPC 10 3748,- 

XPC 20 3998- PCA 4998,- 

PCA20 5598,- PCA 30 6298,- 

PCA 40 6598,- Aufpr. Farbsystem 898,- 

Aufpr. EGA-Syslem 1598,- 

Alle Tandon AT incl. serieller und paralleler Schnittstelle. 


Atari - Atari - Atari - Atari Olivetti - Olivetti - Olivetti 


Atari 1040 ST, Tastatur, 1024 KB RAM, 192 
KB ROM, integrierte Floppy 720 KB, Mono- 
chrom-Monitor SM 124, Maus, 

Basic, Logo 2198,- 

Atari 1040 ST, Tastatur, 1024 KB RAM, 192 
KB ROM, integrierte Floppy 720 KB, Color- 
Monitor SC 1224 Atari, Maus, Basic, 

Logo 2698,- 

Vortex - Vortex - Vortex 


Floppy FI S bzw. M1-S 
Floppy Fl-D bzw M1-D 
Ml -X (3,5") 

Fl X (5,25”) 

M1-XRS (3,5") 

F1-XRS (5,25") 

Star-Star-Star 

NL-10 598,- 

Star NL-10 > 
incl. Interface für Commo- 
dore, Centronics oder IBM 

Einzelblatteinzug 
für Star NL-10 198,- 

zusätzliches Inter¬ 
face für NL-10 129,- 

SD 10 798,- 

SR 10 1248,- 

SG 15 968,- 


878,- 

1298,- 

69B,— 

698,- 

758,- 

758,- 


Olivetti M19 Einstiegskontiguration 
Basiseinheit 256 KB RAM, 2x 360 KB-Disketten- 
laufwerke, B.ldschirm, Tastatur, MS-DOS/GW- 
Basic 2998,- 

Olivetti M 24 

640 KB, 2 Laufwerke, 360 KB, Monitor, Tastatur. 

MS-DOS, GW-Basic, Bus Converter 4999,- 

Olivetti M 24 

640 KB - 1 Diskettenlaufwerk 36C KB, 1 Festplatte 
20 MB, serielle und parallele Schnittstelle. Bus 
'"Converter, Monitor, Tastatur, MS-DOS/GW-Basic 5998,— 
Olivetti M 28 

AT-kompatioel. Einstiegskonfiguration 7698,- 


Commodore-PC 


PC-10 II 2298,- 



148, 

1498, 

898, 


NB 24-15 


1898,- 


OKI OKI OKI OKI OKI OKI 


Warum kaufen Sie denn den PC-10 II mit 20 
MB-Segate-Festplatte für 2999,- DM nicht bet 
uns? Uns ist das unverständlich! 
Commodore PC-1011-20 
mit 20 MB Festpl. integriert, 640 KB 
Hauptspeicher, 2 Diskettenlaufwerke, 

1 Festplatte 20 MB (Seagate), AGA- 
Karte. Monitor, Tastatur. 

MS-DOS/GW-Basic_ Z999,“ 


Amiga 500 1148,- 

(Ausliefening erfolgt im Mai) 

Amiga 2000_3498,- 


Commodore AT PC 40 


5298,- 


Plantron PT-LC 

umschaltbar 4,77/8 MHz, 256 KB 
Hauptspeicher, Monochrom-Grafik¬ 
karte (Herkules kompatibel), paralle¬ 
ler Druckeranschluß, 1 Diskettenlauf¬ 
werk 360 K8. Tastatur (deutsch) mit 
separatem Cursorblock, MS-DOS 
3.2/GW-Basic 1348,- 

Pfantron PT-LC 2/20 wie PT-LC. 
zusätzlich 20 MB Festplatte 2198,- 

Plantron PT-LC/30wie PT-LC. 
zusätzlich 30 MB Festplatte 2398," 

Plantron PT-XTTurbo 

4,77 und 8 MHz Takt, 256 KB Haupt¬ 
speicher, Monochrom-Grafikkarte 
(Herkules kompatibel), Multifunk- 
tionskarte mit paralleler Schnittstelle, 
serieller Schnittstelle, Game Port, 
Echtzeituhr. MS-DOS 3.2 incl. Basic, 

RAM Disk, Druckerspooler, Bedie¬ 
nungsanleitung und Zubehör, 2 Dis¬ 
kettenlaufwerke ä 360 KB, Tastatur 
mit separatem Cursorblock 1848,- 

Plantron PT-XT 2/20 Turbo 

wie PT-XT Turbo, zusätzlich 20 MB 
Festplatte 2798," 

Plantron PT-XT 2/30 

wie PT-XT Turbo, zusätzlich 30 MB 

Festplatte 2998," 

Plantron PT-ST 

6 MHz oder 8 MHz Takt, 640 KB 
Hauptspeicher (bis 1 MB on Board), 
Monochrom-Grafikkarte ( Herkules 
kompatibel), parallele Druckerschnitt¬ 
stelle, Diskettenlaufwerk 1,2 MB, Tas¬ 
tatur (deutsch) mit separatem Cursor- 
block, Echtzeituhr, MS-DOS 
3.2, GW-Basic 2898,- 

Plantron PT-ST/20 

wie PT-ST, zusätzlich 20 MB-Platte 

und Floppy-Hard-Disk-Controller 3998,- 

Plantron PT-ÄT 

wie PT-ST, zusätzlich Muiti-I/O-Karte 
mit paralleler und serieller Schnitt¬ 
stelle. Game Port. Floppy-Hard-Disk- 
Controller 3798,- 

Plantron PT-AT/20 wie PT-AT, 

zusätzlich mit 20 MB Festplatte 4498,- 

Plantron PT-ÄT/30 wie PT-AT, 

zusätzlich mit 30 MB Festplatte 4798,- 

Plantron PT-386 9998,- 

Plantron PT-386 EMO 11.498,- 

Plantron PT-386 E/80 11.998,- 


Okimate 20 Farbdrucker 

mit Interface 548,“ 


MSC-801 

MSP-2000 


398,- 

648,- 


Disketten No-Name 

10 Stück 
3’/2”1D 35,-DM 

3V2”2D 39.- DM 

5V4”2D 19,- DM 


50 Stück 100 Stück 

149,- DM 249, DM 

159,- DM 299,- DM 

59,- DM 89- DM 


ML-182 598,- ML-183 848,- ML-192 999,- 
ML-193 1198- ML-292 998,- ML-293 1298,- 
ML-294 1998,- 


Floppy 1571 688,- 

Monitor 1901 648,- 

5*/*» 1 D 

IOO Stück 

79,- DM 

Commodore C 128 

630,- 

51/4° 1 D 

IOOO Stück 

548,- DM 

Commodore 128 D 

1099- 

SVV’ZP 

IOOO Stück 

598,- DM 


C 64 II 


448,- 


5'/4” Data life HD, 1,6 MB 10 Stück 69,- DM 


Bogenstr. 51-53, Postf. 207, D-5400 Koblenz-Goldgrube 
Telefon 02 61/4047-1 * Telex 862476 PSOFT 


Alle Preise zuzugl. 10 ,- DM Versardkosten pro Pake: Lielerung per Nachnahme oder Vorkassescheck - Versandten Ausland 
DM 40 - pro 3 akel Lassen Sie sich keinen Bären aufbinden! ProSoft liefert Original-Produkte der führenden Hersteller. 
Überzeugen Sie sich selbst durch Abholung der Ware in unseren Verkaufs- und Vorführräumen in Koblenz. Wir gewähren 
Ihnen bei Barzahlung (kein Scheck) 2 14 Skonto aul alle Preise, was vielleicht schon zur Deckung Ihrer Reisekosten aus¬ 
reicht Einige unserer Vorlieferanten liefern Produkte ohne die Seriennummer des Herstellers. In diesem Fall übernehmen 
wir anstelle der Herstellergarantie die unbeschränkte gesetzliche Gewährleistung. CPC - 4/87 

























































I—Serie 



Spieleprogrammierung 
in Assembler 


Folge 3 


Die Feinde der Spielfigur 
Aufbau und Steuerung 

Mit Abschluß der letzten Folge haben 
wir bis dato ein Spielgerüst erstellt, 
welches die Bewegung unserer Spiel- 
figur Karlchen innerhalb der logischen 
Gesetzmäß igkeiten des Spielfeldes 
erlaubt. 

Dabei haben wir eine Definition des 
Spielfeldes ermöglicht, die vollkom¬ 
men flexibel das Einbinden beliebig 
aufgebauter Levels im dynamisch ab¬ 
gelegten Vektorformat ermöglicht. 

Nun ist natürlich dieses Spielgerüst 
noch lange nicht vollständig, da näm¬ 
lich das eigentlich wichtige eines je¬ 
den Spieles, der Spielwitz, die 
»action«, noch nicht programmiert 
wurde. In dieser Folge sollen nun die 
Grundlagen dafür geschaffen werden, 


daß ein wenig Leben ins Spiel kommt 
und auch deutlich wird, welche Pro¬ 
bleme Karlchen auf den Baugerüsten 
des Sirius zu bewältigen hat. 

Alle für die Erweiterung unseres Spie¬ 
les nötigen Änderungen werden am 
Ende dieser Folge aufgelistet, so daß 
lediglich alle neuen Zeilennummem in 
den Quelltext eingefügt werden 
müssen. 

Zunächst definieren wir mit Hilfe des 
nun schon bewährten Prinzips der 
Neudefmition einzelner Zeichen die 
Feinde von Karlchen, die Monks. Die 
Matrix eines Monks ist in Schaubild 
1 gegeben. 

Die errechneten Bitmuster der Monks 
tragen wir nun in unser Assemblerli- 
sting ab 27702 ein. Dieses Bitmuster 
eines Monks wird also nun unter Steu¬ 
ercode 235 im Zeichensatz verfügbar 
sein. Wenn nun der Monk definiert ist, 
tritt erst das eigentliche Problem auf, 


welches wir mit der Problematik der 
»Gegner für die Spielfigur« aufgeris¬ 
sen haben: wir müssen nun ein zuver¬ 
lässiges System finden, welches 
beliebig viele Monks (die Zahl soll 
sich je nach Spielstufe verändern) stän¬ 
dig über den Bildschirm bewegt, aber 
dennoch registriert, wenn einer der 
Monks unser Karlchen gefangen hat. 
Zur Lösung dieser umfangreichen 
Problematik sollten wir das Problem 
zunächst einmal schematisieren: 

- Darstellung von beliebig vielen 
Monks auf dem Spiellevel 

- ständige Bewegung aller dieser 
Monks innerhalb der Gesetzmä¬ 
ßigkeiten eines Levels 

- Registrieren des Kontaktes eines 
Monks zur Spielfigur 

Eine weitere Schwierigkeit all dieser 
Punkte liegt in der Tatsache, daß die 
für die obige Aufgabe zu entwickeln¬ 
den Steuerroutinen parallel zu der 
Kontrolle der Hauptfigur Karlchen ab¬ 
laufen müssen. Das heißt, es muß na¬ 
türlich möglich sein, Karlchen auch 
ständig weiterzubewegen. Wir wollen 
nun innerhalb dieser Folge ein System 
erarbeiten, daß alle oben gesetzten 
Kriterien erfüllt und dennoch so fle¬ 
xibel gestaltet ist, daß es alle indivi¬ 
duellen Anpassungen der Benutzer 
erlaubt und sogar begünstigt. Zu den 
oben aufgeführten Problemen kommt 
jedoch noch eines hinzu: die Entwick¬ 
lung einer Spielstratcgie für die 
Monks, so daß sie in der Lage sind, 
Karlchens Bewegungen auf dem Bau¬ 
gerüst schnell und umgehend ein En¬ 
de zu verschaffen. Es muß also noch 
zusätzlich überlegt werden, wie eine 
solche kontrollierte Bewegung der 
Spielfiguren geschehen kann. So kann 
mit Hilfe der Strategie der Monks auch 
die Spielstärke beliebig verändert wer¬ 
den. Richtig programmiert könnte 
man die Monks in die Lage versetzen, 
ein längeres Spiel für Karlchen un¬ 
möglich zu machen. Man muß also bei 
der Spielstrategie den richtigen Mit¬ 
telweg finden, damit das Spiel nicht 
zu schwer, aber auch nicht zu leicht 
gestaltet wird, so daß es ständig inter¬ 
essant bleibt. 
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Bild 1: Matrizen der "Monks" 


Monstertyp 1: 

0.0 

. 0 .... 0 . 
0 0 0 . . 0 0 0 
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Monstertyp 2: 
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Monstertyp 3: 
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Bild 2: Datenstruktur der Spielstutenorganisation 


Anzahl der Spiel stufen = 


N 

Levelnummer für Spiel stufe 1: 


LNR (1) 

Anzahl Feinde Spielstufe 1: 


FA <1) 

Monstertyp für Spielstufe 1; 


MT (1/ 

Anfangsadresse Kontrollroutine Spiel stufe 

1: 

KADR <1) 

Levelnummer für Spiel stufe 2: 


LNR (2) 

Anzahl Feinde Spiel stufe 2: 


FA (2) 

Monstertyp für Spielstufe 2: 


MT <2> 

Anfangsadresse Kontrollroutine Spielstufe 

2: 

KADR (2) 

Levelnummer für Spiel stufe N: 


LNR <N) 

Anzahl Feinde Spiel stufe N: 


FA (N) 

Monstertyp für Spiel stufe Ns 


MT (N) 

Anfangsadresse Kontrollroutine Spiel stufe 

N: 

KADR <N> 


tiild S: Anfangspositionen aut Level 1. grafische Darstellung 



In dieser heutigen Folge wollen wir die 
Strategie der Monks erst einmal ein 
wenig außer acht lassen und uns ledig¬ 
lich mit den anderen genannten Pro¬ 
blemen beschäftigen, was schon 
Fragen und Schwierigkeiten genug 
aufwerfen wird. 

Zunächst einmal müssen die konkre¬ 
ten Datenstrukturen ausgearbeitet wer¬ 
den, die für die Kontrolle der Monster 
auf dem Spielfeld unumgänglich sind. 
Im wesentlichen sind das erst einmal 
die Koordinaten der Monster, für die 
wir einfach hintereinander je Monster 
2 Bytes reservieren. Für beispielswei¬ 
se 5 Monster legen wir 10 Bytes Spei¬ 
cherplatz fest. 

Um das Problem des Darstellung der 
Monster zu konkretisieren, sollten wir 
uns einmal vorstellen, welche Arbeits¬ 
schritte notwendig sind, um ein Spiel- 
level — inklusive Karlchen und Monks 
— komplett aufzubauen. Tabellarisch 
und umgangssprachlich ergibt sich der 
folgende Algorithmus: 

Heraussuchen der Leveinummer 
Zeichnen des Levels (Routine 
PNTSCR) 

Heraussuchen der Monsteranzahl in 
diesem Level 

Schleife: Von 1 bis Monsteranzahl 
Heraussuchen der Anfangskoordina¬ 
ten des Monks 

Monk auf dem Bildschirm zeichnen 
Ende der Schleife 

Karlchen auf dem Bildschirm zeichnen 

Nun weist schon dieser Algorithmus 
eine Menge von grundsätzlichen Pro¬ 
blemen auf, die vielleicht beim ersten 
»Überfliegen« überhaupt nicht auffal¬ 
len. Es fällt nämlich insgesamt drei¬ 
mal das mysteriöse Wort »heraus¬ 
suchen« innerhalb dieses Textes. 
Nun drängt sich da natürlich sofort die 
Frage auf, nach welchen Kriterien hier 
etwas »herausgesucht« werden soll. 
Es muß also eine genaue Zuordnung 
gefunden werden, die für jede Spiel¬ 
stufe angibt, welche Leveinummer 
und welche Monsteranzahl innerhalb 
dieser Spielstufe benutzt werden soll. 
Wir wollen in unserer Überlegung al¬ 
lerdings noch ein wenig weiter gehen. 
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3 , 2 

(Monster 1) 

38 , 2 

(Monster 2/ 

20 , ö 

(Monster 3) 

15 , 1 

(Monster 4) 

35 , 16 

(Monster 5) 

Bild 4: Ante 
aut Level 1. 

ngspositionen 
numerisehe 

Darstellung 



So liegt das Wesen eines Videospiels 
der »look’n run«-Art ja in der Tatsa¬ 
che, daß das Spiel von Spielstufe zu 
Spielstufe schwieriger wird. In diesem 
Zusammenhang liegt nahe, daß ein 
großer Bestandteil dieses Schwierig¬ 
keitsgrades in der Kontrollroutine 
liegt, die für die Steuerung der Bewe¬ 
gung der Monks verwendet wird. So 
wäre hier ja die interessanteste und fle¬ 
xibelste Lösung, das Spiel so zu ge¬ 
stalten, daß unter Umstanden für jede 
Spielstufe eine neue (und schwierige¬ 
re) Kontrollroutine für die Monks rea¬ 
lisiert werden kann. 

Für jede Spielstufe könnte man also 
mit Ablegen: 

— der Nummer des Levels, welches 
gezeichnet werden soll 

— der Anzahl der Monks, die sich in 
diesem Level bewegen sollen 

— der Nummer des Monstertyps, der 
verwendet werden soll 

— der Adresse, ab der die Kontroll¬ 
routine für die Monks beginnt 

ein vollkommen flexibeles System der 
Spielstufen entfalten. Die dazu gehö¬ 
rige Datenstruktur geht aus Bild 2 
hervor. 

Um noch einmal die Flexibilität die¬ 
ser Datenstruktur aufzuzeigen, sollen 
die Vorteile dieser Lösung noch ein¬ 
mal durchgegangen werden. 

Mit der obigen Struktur kann man zum 
Beispiel festlegen, daß Spielstufe 1 mit 
Leveinummer 1 und einem Monk ge¬ 
löst werden muß, während Spielstufe 
2 mit Leveinummer 1 und 3 Monks 
gespielt werden muß (wie schon ge¬ 
sagt, sollen die Spielstrategien erst ein¬ 
mal außer acht gelassen werden). 
Außerdem wollen wir drei unter¬ 
schiedliche Monstertypen in das Sy¬ 
stem einbinden, die sich durch ihr 
Äußeres unterscheiden. Die Nummer 


des Monstertytps gibt dann zu jeder 
Spielstufe an, welches Monster inner¬ 
halb dieses Levels gezeichnet werden 
soll. 

Damit wäre die Art und Weise des 
»Heraussuchens« in den ersten beiden 
Fällen realisiert, nicht jedoch das ver¬ 
bleibende “Heraussuchen“, das “Her¬ 
aussuchen der Anfangskoordinaten des 
Monks“. Wie soll das Erscheinen der 
Monks denn in der Realität aussehen? 
Nun, nach Aufbau des Levels sollen 
an beliebigen, unterschiedlichen Stel¬ 
len die Monks auftauchen und begin¬ 
nen, sich zu bewegen. 

Nach welchem Prinzip können nun die 
Anfangskoordinaten dieser Monks er¬ 
mittelt werden? Einerseits muß das 
Problem zufriedenstellend gelöst wer¬ 
den, andererseits sollte die Lösung je¬ 
doch so ausfallen, daß der Benutzer 
diese Koordinaten seinen individuel¬ 
len Bedürfnissen anpassen kann, etwa 
nach folgendem Muster: 

— starker Spieler = > Monster zu 
Beginn nahe bei Karlchen 

— schwacher Spieler = > Monster 
zu Beginn weit von Karlchen weg 

Das einfachste Prinzip, welches ohne 
großen Programmieraufwand günsti¬ 
ge Positionen für die Anfangskoordi¬ 


naten der Monster angibt, liegt im 
konstanten Ablegen dieser Koordina¬ 
ten. Bei zum Beispiel fünf Monstern 
kann das so aussehen, daß hinter den 
Bildvektoren eines jeden Levels ein¬ 
fach die Anfangskoordinaten für fünf 
Monster abgelegt werden. Wenn also 
ein Level an das Spiel angefügt wer¬ 
den soll, wird einfach überlegt, wo 
sich günstige Positionen für die Mon¬ 
ster befinden, von da aus werden die 
Monster dann ihr Spiel starten. Wenn 
man also die maximale Monsteranzahl 
auf fünf festlegt, müssen für jedes Le¬ 
vel 10 (2*5) Bytes Speicherplatz hin¬ 
ter diesem Level mit den Koordinaten 
belegt werden. Wird dieses Level dann 
mit weniger als fünf Monstern ge¬ 
spielt, so werden nur die ersten, der 
Monsteranzahl entsprechenden Koor¬ 
dinaten als Ausgangspunkte für die 
Monks benutzt. 

Die Schaubilder 3 und 4 zeigen exem¬ 
plarisch diese Umsetzung der grafi¬ 
schen Ausgangspositionen in 
numerische Daten am Beispiel von Le¬ 
vel 1 an. In unserem Listing werden 
diese Daten dann einfach hinter die 
Leveidaten von Spielstufe 1, also ab 
Zeile 28002 angehängt. 

Aus diesen Daten wird die richtige 
Anzahl der Monsterkoordinaten her¬ 
ausgesucht und die Monks an den an- 


Bild 5: Datenstruktur der notwendigen Parameter 

Maximale Monsteransahl = 

aller 

M 

Monster: 

X-Koordinate erster Monk: 

XK 

<1> 

Y-Koordinate erster Monk: 

YK 

(1) 

Richtungsvektor X erster Monk: 

VX 

(1) 

Richtunqsvektor Y erster Monk: 

VY 

(1) 

Hintergrund erster Monk: 

HB 

(1) 

X-Koordinate zweiter Monk: 

XK 

(2) 

Y-Koordinate zweiter Monk: 

XK 

(2) 

Richtungsvektor X zweiter Monk: 

VX 

(2) 

Richtungsvektor Y zweiter Monk: 

VY 

(2) 

Hintergrund zweiter Monk: 

HG 

(2) 

X-Koordinate M-ter Monk: 

XK 

(M>. 

Y-Koordinate M-ter Monk: 

XK 

(M) 

Richtunqsvektor X M-ter Monk: 

VX 

(M) 

Richtungsvektor Y M-ter Monk: 

VY 

(M) 

Hintergrund M-ter Monk: 

HG 

<M> 
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gegebenen Bildschirmpositionen ge¬ 
zeichnet. Damit jedoch auch eine 
Möglichkeit besteht, diese Monster 
weiter zu bewegen, werden die Koor¬ 
dinaten gleichzeitig in die Koordina¬ 
tenliste (siehe oben) der Monster 
eingetragen. 

Mit dieser Methode wären wir also so¬ 
mit in der Lage, ein Level mitsamt der 
bösen Monks und Karlchen aufzubau¬ 
en. Die genaue Realsierung dieser Idee 
stellt eine Erweiterung der Routine 
PNTSCR dar, mit der — festgelegt für 
jede Spielstufe - zu jedem Level die 
Monks an den bezeichneten Stellen des 
Bildschirm gezeichnet werden. 

Die Erweiterungen des Quelltextes für 
diese Methode sind im Anschluß an 
den Artikel ausgegeben.Nach diesem 
Vorbereitungen kann nun das eigent¬ 
liche Kontrollkonzept für die Bewe¬ 
gung der Monks innerhalb unseres 
Spieles geschehen. In einem Video¬ 
spiel sind die Bewegungen der »Fein¬ 
de« meist aus folgendem Algorithmus 
heraus programmiert: 



Um die Ausführung dieses Algorith¬ 
mus in den Griff zu bekommen, sche¬ 
matisieren wir nun einmal das 
folgende Bewegungsmodell: 

Wir stellen uns vor, in einer kleinen 
Stadt, die aus einem komplizierten Sy¬ 
stem von Einbahnstraßen besteht, mit 
Hilfe eines Peilgerätes ein fremdes, 
»gegnerisches« Auto verfolgen zu 
müssen. Wie würden wir dabei syste¬ 
matisch vorgehen? Wenn wir uns an 
die Verkehrsregeln hielten, würden 
wir zu Beginn unserer Verfolgung erst 
einmal eine Peilung einleiten. 


Je nach Ergebnis dieser Peilung wür¬ 
den wir dann in eine bestimmte Rich¬ 
tung losfahren. Da wir in einer Ein¬ 
bahnstraße nicht umkehren dürfen, 
würden wir auf jeden Fall bis zur 
nächsten Kreuzung weiterfahren. Hier 
würden wir nun erneut peilen, dann 
überprüfen, ob unsere bisherige Fahrt¬ 
richtung noch den neuen Peildaten ent¬ 
spricht und dann (eventuell in eine 
andere Richtung) bis zur nächsten 
Kreuzung weiterfahren. Genau dieses 
Modell wollen wir nun auf die Bewe¬ 
gungen der Monster in unserem Vi¬ 
deospiel übertragen. Denn um die 
Rechenzeit möglichst gering und da¬ 
durch die Spielgeschwindigkeit mög¬ 
lichst hoch zu halten, sollen die Monks 
ihre Bewegungsrichtung nur an den 
»Kreuzungen« des Spiellevels verän¬ 
dern können (also zum Beispiel an ei¬ 
ner Überschneidung von Ebene und 
Leiter). 

Diese Struktur kann ganz unkompli¬ 
ziert implementiert werden: Für jedes 
Monster wird je ein Richtungsvektor 
für die x-Richtung und die y-Richtung 
in der Datenstruktur vereinbart. Die¬ 
ser Richtungsvektor hat entweder der 
Inhalt — 1, Null oder +1. Nun wer¬ 
den bei jeder Monsterbewegung ein¬ 
fach die Richtungsvektoren für X und 
Y auf die Koordinaten der Monster 
aufaddiert, so daß umständliche Kor¬ 
rekturen und Rechnungen vor jeder 
Bewegung der Monster ausbleiben. Es 
muß lediglich untersucht werden, ob 
das Monster sich an einer neuen 
»Kreuzung« befindet. Wenn das der 
Fall ist, wird in die Kontrollroutine der 
Bewegung (deren Adresse wir ja für 
jede Spielstufe variabel in einer Tabel¬ 
le abgelegt haben) gesprungen und 
dann gegebenenfalls die Richtung kor¬ 
rigiert. 

Die Richtungsvektoren für jedes ein¬ 
zelne Monster werden in die Daten¬ 
struktur eingeflochten, indem die dafür 
notwendigen 2 Bytes pro Monster le¬ 
diglich hinter den Koordinaten der 
Monster abgelegt werden. Außerdem 
wird hier noch ein zusätzliches Byte 
angehängt, welches den aktuellen Hin¬ 
tergrund eines jeden Monsters abspei¬ 
chert, da dieser ja durch das Monster 


überschrieben wird. Die daraus resul¬ 
tierende Datenstruktur geht aus Bild 
5 hervor. Die Richtungsvektoren mit 
den Inhalten 4-1 oder -1 wurden im 
Quelltext dadurch realisiert, daß das 
siebte Bit entsprechend dem Vorzei¬ 
chen des Vektors gesetzt oder gelöscht 
wird. 

Doch nun sollte der Blick auf den ei¬ 
gentlichen Quelltext gerichtet werden. 
Die Änderungen im Quelltext werden 
hier kurz Umrissen. Die detaillierten 
Kommentare sind im Quelltext selbst 
gegeben. 

Die erste Erweiterung liegt im Zeilen¬ 
bereich von 3800 bis 3950. Hier wur¬ 
den die alten Zeilen 3800 und 3900 
durch den neuen Quelltext überschrie¬ 
ben. Diese Erweiterung bindet die Be¬ 
wegungsroutine der Monster (MOV) 
in das Hauptprogramm ein. 

Als zweiter Bereich der Erweiterun¬ 
gen sind die Zeilen von 20002 bis 
20010 zu nennen. Hier wurden die Va¬ 
riablen für das aktuelle Level, die ak¬ 
tuelle Monsteranzahl und den 
aktuellen Monstertyp implementiert. 
Außerdem findet sich hier noch die 
Variable MONCNT, die zur Syn¬ 
chronisation zwischen den Bewegun¬ 
gen von Karlchen und denen der 
Monks dient (dazu später mehr). 

Eine entscheidende Änderung ist die 
Erweiterung des Quelltextes um die 
Zeilen 20304 bis 20396. Hier wird die 
Organisation der Spielstufen (siehe 
auch Bild 2) eingebaut. Das heißt, es 
werden hier in Abhängigkeit von der 
gewählten Spielstufe die Levelnum- 
mer, die Monsteranzahl, der Monster¬ 
typ und die Adresse der Kontroll¬ 
routine ermittelt. 

Die Zeilen 25350 und 25550 wurden 
hinzugefügt, damit der Zeiger auf die 
Leveidaten (HL), der durch das Koor¬ 
dinatensetzen ja verlorengeht, nicht 
zerstört wird. Auch an das Ende der 
Routine PNTSCR wurde von Zeile 
25910 bis Zeile 26170 eine Erweite¬ 
rung eingefügt. In diesem Falle wer¬ 
den die Anfangskoordinaten der 
Monster aus der Koordinatentabelle 
am Ende des Level ausgelesen. 

An den der Monsteranzahl entspre¬ 
chenden Stellen werden dann die 
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Monks auf dem Bildschirm gezeich¬ 
net. Gleichzeitig werden die Koordi¬ 
naten und der Monsterhintergrund in 
die Tabelle ab MONT AB eingetragen. 
Die Erweiterung von Zeile 26006 bis 
26016 stellt die Routine KONTR1 dar. 
Diese Routine ist die Kontrollroutine 
für die Monster im Bezug auf Spiel¬ 
stufe 1 (siehe auch Bild 2). In diese 
Routine wird immer dann gesprungen 
(von MOV aus), wenn einer der 
Monks auf einen Hintergrund trifft, 
über den er sich nicht so einfach hin¬ 
wegbewegen kann (Karlchen, Leiter, 
anderer Monk oder Ebenenende). 
Da wir über die genaue Ausarbeitung 
einer sinnvollen Kontrollroutine in der 
nächsten Ausgabe noch einmal debat¬ 
tieren wollen, haben wir in KONTR1 


lediglich eine Routine gestellt, welche 
die Bewegungen des Monks umdreht. 
Als Beispiel: ein Monks bewegt sich 
auf einer Ebene nach rechts. Nun ge¬ 
langt er an eine Leiter, was vom Pro¬ 
gramm registriert wird, so daß in die 
Routine KONTR1 gesprungen wird. 
Hier wird die Bewegung einfach um¬ 
gedreht, also bewegt sich der Monk 
dann nach links. 

Alle Monks bewegen sich also mit die¬ 
ser Kontrollroutine immer hin und her. 
Im Bereich von Zeile 27711 bis Zeile 
27750 haben wir das Programm um 
einige leistungsfähige Datenstrukturen 
erweitert. Zum ersten sind das die Da- 
tas für die drei unterschiedlichen Mon¬ 
stertypen. Direkt im Anschluß daran, 
ab Level LEVORG wurden die Daten¬ 


struktur aus Bild 2 eingebunden. Hier 
kann man also zum Beispiel die Mon- 
steranzahl oder den Monstertyp für ei¬ 
ne bestimmte Spielstufe ändern. 

Die Zeile 28002 gibt die numerische 
Darstellung der Anfangskoordinaten 
wieder, an denen die Monks zu Be¬ 
ginn gezeichnet werden sollen. 

Die insgesamt komplexeste Erweite¬ 
rung aber findet sich zwischen den 
Zeilen 28100 und 29320 wieder. Dort 
steht die Bewegungsroutine der 
Monks. Die Synchronisation zwischen 
der Bewegung der Monks und der Be¬ 
wegung von Karlchen findet sich da¬ 
bei zwischen den Labels MOVMON 
und MOV (zum Problem der Syn¬ 
chronisation in der nächsten Folge 
mehr). Dahinter (ab MOV) werden die 



3800 

t r 

c,test 

: Taste qedrueckt, dann =. test. 

20388 

sc f 

; durch Rotation nach links 

3810 

Cöl 1 

HiGvmnn 

. ; sonst Monks beweqen 

20392 

ccf 

; mit 2 multiplizieren 

3820 


joysti 

2 -und zur Abfrage 

20396 

rla 

3900 test.t 

push 

af 

2 -Akku retten 




3930 

call 

mov 

2 -Monks beweqen 




3940 

pop 

af 

1 und Aklcu wieder holen 

25350 

push hl 

; -HL retten 

3950 

ld 

hl,(y) 

2 -Koordinaten von Karl laden 

25550 

pop hl 

; -hl wieder holen 






25910 

ld 

a,taktmon) 

) -aktuelle Monsteranzahl nach 

20002 

aktlev: üefb 

0 

1 -aktuelles Level 

25920 

Id 

b, a 

; B laden 

20004 

aktmon: defb 

0 

; -aktuelle Monsteranzahl 

25930 

ld 

ix,montab 

{ -Adresse Monktable nach IX 

20005 

aktcde: defb 

0 

! -aktueller Code fuer Monstertyp 

25940 monmal 

ld 

d,(hl) 

; -Koordinaten des Monks Nr B 

20008 

fflontab: defw 

0,0,0.0,0,0.0 

1 -Tabelle fuer Koordinaten und 

25950 

ld 

<ix+0),d 

; aus Leveltabelle holen und 

20009 

defw 

0,0,0,0,0,0 

; Hintergrund der Monks 

25960 

inc 

hl 

; in DE und in Monktabelle neu 

20010 

moncnt: defb 

0 

i -Zaehler zur Synchronisation 

25970 

ld 

e,(hl) 

; eintragen 





25980 

ld 

(ix+1) ,e 






25990 

inc 

hl 






26000 

ld 

(ix+2>, 1 

( -Richtunsvektor X auf 1 und 

20304 

rla 


1 -nochmal verdoppeln 

26010 

ld 

(ix+3) ,0 

; Richtungsvektor Y auf 0 setzen 

20308 

ld 

h.o 

! -HL mit Spielstute t 2 laden 

26020 

ex 

de,hl 

; -Koordinaten des Monks nach HL 

20312 

ld 

1, a 


26030 

call 

#bb75 

; und Koordinaten setzen und 

20316 

ld 

bc.levarg 

1 -BC = Adresse Levelstrukturtable 

26040 

call 

»bb6ö 

; Bildschirm ausiesen 

20320 

add 

hl ,bc 

; -HL zeigt nun auf aktuelle Struktur 

26050 

ld 

(ix+4) ,a 

; -Bildhintergrund ablegen 

20324 

ld 

4.(hl) 

1 -Akku mit aktueller Levelnummer laden 

26060 

ex 

de,hl 

5 -alten Registerzustand herstell 

20328 

ld 

(aktlev),4 

1 und ab 1 egen 

26070 

ld 

a,(aktcde) 

; -Monsterzeichencode laden 

20332 

mc 

hl 

1 -Zeiger auf Monsteranzahl 

26080 

call 

(tbbSa 

; und Monster darstellen 

20336 

ld 

4, (hl) 

; -Monsteranzahl laden und 

26090 

ld 

de, 5 

1 -Zeiger IX um 5 erhoehen (durch 

20340 

ld 

(aktmon),4 

; ableqen 

26100 

add 

ix, de 

; (Addition mit DE) 

20344 

inc 

hl 

1 -HL zeigt auf Monstertyp 

26110 

djnz 

monmal 

t -und naechstes Monster 

20348 

ld 

4, (ML) 

; -Manstertyp laden und 

26120 

ret 



20352 

add 

a,235 

1 Zeichennummer addieren, dann 





20356 

ld 

(4ktCdD),4 

; Monstercode ablegen 





20360 

inc 

hl 

) -Zeiger auf Adresse Kontrollroutine 





20364 

ld 

4,(hl) 

s -Adresse der Kontrollroutine 





20368 

ld 

(aktadl),a 

1 nach aktadl uebertragen 

26130 kontrls 

ld 

a,(ix+2) 

;Richtungsvektor aktueller Monk 

20372 

inc 

hl 


26140 

xor 

128 

; -Bewegungsrichtung X umdrehen 

20376 

ld 

a,(hl) 


26150 

Id 

(ix*2), a 

; -und Vektor wieder ablegen 

20380 

ld 

(aktadl*l>.a 


26160 

ret 



20384 

ld 

«.'aktlev) 

1 -aktuelle Levelnumer laden und 

26170 ) 
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Monster bewegt. Diese Bewegung der 
Monster geschieht in der folgenden 
Reihenfolge: 

— alle Monster löschen 

— alle neuen Koordinaten berechnen 
und den Bildhintergrund ablegen 

— gegebenenfalls Bewegungsrich¬ 
tung korrigieren 

— alle Monster zeichnen 

Diese Reihenfolge war deshalb not¬ 
wendig, damit ausgeschlossen wird, 
daß ein Monster ein anderes als Bild¬ 
hintergrund abspeichert. Dieser Teil 
des Quelltextes ist sehr gut dokumen¬ 
tiert, so daß eine genauere Erläuterung 
hier überflüssig wäre. Eine Besonder¬ 
heit ist jedoch noch zu bemerken. Sie 
betrifft die Zeilen 29000 und 29020. 


Da der Z80 einen bedingten, indirek¬ 
ten Unterprogrammaufruf (etwa: 

“CALL NZ,(label)“) 

nicht kennt, wurde dieser Befehl hier 
simuliert, damit völlig variabel die 
Kontrollroutine angesprungen werden 
kann. Zu diesem Zwecke wurde die 
Variable für die Adresse der Kontroll¬ 
routine (AKTAD1) direkt in das Pro¬ 
gramm gelegt, das Byte davor (196) 
ist die dezimale Darstellung des 
“CALL NZ,“. 

Mit dem obigen System haben wir ein 
Spiel geschaffen, in dem sich unser 
Karlchen ständig bewegen läßt, sich 
alle Monster aber dennoch parallel da¬ 
zu bewegen. Allerdings werden Kon¬ 


takte zwischen Karlchen und Monks 
noch nicht registriert (sie müßten ja 
zum »Tode« von Karl führen). 

Aus diesem Grude können auch noch 
Fehler auftreten, wenn Karlchen über 
die Monks hinwegbewegt wird (was 
aber mit einer neuen KONTR1-Rou¬ 
tine in der nächsten Folge behoben 
wird). Außerdem hat Karl noch kei¬ 
nerlei Möglichkeit, sich gegen die 
Monks zur Wehr zu setzen. 

Aber wir werden uns mit diesem Miß¬ 
ständen in der nächsten Folge mit den 
beiden Themen »Karlchen wehrt sich« 
und »Die Monks lernen dazu« befas¬ 
sen. Und solange viel Spaß mit 
“CALL &A000“ und HEKTIK! 

(M. Althaus/M. Zietlow) 



27711 

defb 

129.66,231. 

255,153,231,126,361 -Monstertyp 1 

28520 

and 

127 

; 

Vorzeichen ausblenden und 

27712 

defb 

231,231,36, 

36,126,219,255,126; -Monstertyp 2 

28540 

ld 

d,a 

1 

Vektor nach D 

27713 

defb 

129.129,195 

,195,231,189,255,126; -Monstertyp 3 

23560 

ld 

a.h 

t 

X-Koordlnate nach Akku 

27749 levorg 

defb 

0,5.2 

; -Spielstote lt Level,Monk-ahl, 

28580 

sub 

d 

< 

und VX abziehen 

27750 

defw 

kontrl 

; Monktyp und Kontrnl 1 adresse 

20600 

ld 

h,a 

9 

dann wieder X-koordinate nach h 





28620 mi2: 

ld 

a. (ix*3> 

i 

-Kommentare siehe Zeilen 28360 bi 





28640 

and 

128 

1 

28600, nun aber mit »-Koordinate 

20002 

dein 

3,2,38,2,20 

6,15,11,35,16; -Anfangskoordlnaten 

28660 

j r 

nz,mi3 

s 

und V-Richtungsvektor 





28680 

ld 

a,(ix*3> 



2S100 «Ovfflon: 

Id 

a.(moncnt > 

1 -Sunchronisationsbvte 

28700 

add 

a, 1 



28120 

add 

a, 1 

; Inkrementieren 

28720 

ld 

1 ,a 



28140 

Id 

(moncnt).a 

; und wieder speichern 

28740 

jr 

mi 4 



28160 

cp 

250 

t -auf Endwert pruefen 

28760 mi3: 

ld 

a. (ix+3) 



28180 

jr 

z. mov 

1 -wenn erreicht, »7 mov 

28780 

and 

127 



28200 

ret 


; -sonst zurueck 

28800 

lo 

d.a 



28220 mov: 

ld 

a,0 

1 -Synchronisationsbyle auf 

28820 

ld 

a, 1 



2824Ö 

ld 

(moncnt).a 

; Null setzen 

28840 

sub 

d 



28260 

Id 

a, (aktmon) 

l -aktuelle Monsteranzabl nach 

28860 

ld 

1 ,a 



28280 

ld 

b, a 

I B 1 aden 

28880 mi4i 

ld 

(ix+0), h 

1 

-neue Koordinaten (HL) wieder 

28300 

ld 

lK.montab 

I -und IX mit Adresse Monktable laden 

28900 

ld 

(ix+l),l 

1 

in Tabelle ablegen 

28303 monweq: 

ld 

h,(ix+ 0 > 

1 -Koordinaten nach HL 

28920 

call 

(tbb7S 


-dann Koordinaten ansteuern, 

28306 

ld 

1 , <i«+1> 

1 1 aden 

28940 

call 

KbböO 

1 

Hintergrund auslesen und 

28309 

call 

Hbb75 

1 -Kardinaten setzen und 

28960 

ld 

(ix)4>,a 

1 

abspe!ehern 

28312 

ld 

a,(ix+4> 

1 alten Hintergrund 

28980 

cp 

32 

1 

-fall Feld nicht frei, dann 

28313 

call 

HbbSa 

I wiedsrherstellen 

29000 

defb 

196 

1 

nach KontrolIroutine 

28318 

ld 

de,5 

; -Zeiger IX ueber Addition mit 

2902G „kt ad 1 

defw 

0 

1 

ab (axtadi) springen 

28321 

add 

i x, de 

1 DE um 5 erhoehen 

29040 

ld 

de,5 


-ansonsten IX um 5 

28324 

d jn2 

monweq 

; -fuer alle Monster wiederholen 

29060 

add 

ix, de 

1 

erhoehen (durch DE) 

28327 

ld 

a,(aktmon) 

1 -Anzahl Monster nach 

29080 

djnz 

mov2 


und naechstes Monster ansteuern 

28330 

ld 

b, a 

; b 1 aden und 

29100 

ld 

a,(aktmon) 

f 

-Monsteraniahl ueber Akku 

28333 

ld 

ix.montab 

1 Adresse Monstertabeile nach IX 

29120 

ld 

b.a 

; 

nach 8 laden 

28335 mov2i 

ld 

h. (ix+0> 

3 -Koordinaten nach HL laden 

29140 

ld 

ix,montsb 


-Adresse Monktabelle nach IX 

28340 

ld 

1, (ixfl) 


29160 showi 

ld 

h,(ix+0) 

? 

-Koordinaten nach HL laden 

28360 

ld 

a, (ix+ 2 ) 

; -Richtunqsvektor X nach Akku 

29180 

ld 

l, (ixUi 



28380 

and 

128 

; -Vorzeichen einblenden 

29200 

ld 

de. 5 

i 

-Zeiger IX ueber DE um 5 

28400 

i r 

nz,mi 1 

; -wenn <70, dann VX negativ, mi 1 

29220 

add 

ix.de 

i 

aufaddieren 

28420 

ld 

a, <ix+2i 

; sonst VX zu 

29240 

call 

4bb75 

i 

-Koordinaten setzen und Monk 

28440 

add 

a,h 

; «-Koordinate addieren 

29260 

ld 

a,(aktcde) 


1 aden und 

28460 

ld 

h,a 

1 und Koordinate nach H 

29280 

call 

»bb5a 

i 

darstelien 

28480 

jr 

mix 

; -dann weiter nach =} mi* 

29300 

d inz 

Show 


-fuer alle Monks wiederholen 

28500 ml 1: 

ld 

a,<ix+2> 

i -Vektor Ist negativ, also 

29320 

ret 
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Mein Computer unterhält sich 

Folge 3 


In der dritten Folge unserer Serie 
»Mein Computer unterhält sich«, 
wollen wir uns, wie bereits im Auf¬ 
taktartikel angekündigt, mit Datex- 
P, speziell Datex-P 20F beschäfti¬ 
gen. Das allgemeine Schema einer 
Mailbox soll Ihnen dieser Bericht 
ebenfalls anhand einiger bekannter 
Systeme zeigen. 


Wollen wir mit den Mailboxen begin¬ 
nen. Der Begriff Mailbox kommt — 
wie wird es wohl sein — aus dem Eng¬ 
lischen und bedeutet nichts anderes als 
Briefkasten. Eine Mailbox ist im Prin¬ 
zip also ein elektronischer Briefkasten, 
der noch einiges Interessantes mehr 
bietet. In der Regel kann der User, so 


nennt man einen eingetragenen Benut¬ 
zer — dazu später mehr — noch viel 
mehr abrufen, als nur seine persönli¬ 
che Post. Der letzte Satz sagt es schon, 
in einer Mailbox können sich alle Be¬ 
nutzer gegenseitig Post zukommen 
lassen. 

Über einen Texteditor kann der User 
A eine Nachricht schreiben. Ist er mit 
dem Endergebnis zufrieden, hat er nun 
die Möglichkeit, diese Nachricht, in 
der Mailboxsprache Message genannt, 
an den User B zu senden. 

Nach dem Abspeichern befindet sich 
die Message sofort, also ohne Umwe¬ 
ge, in dem persönlichen Postfach des 
Users B. Sobald der Benutzer B die 
Mailbox angerufen hat, wird ihm 


durch eine von System zu System ver¬ 
schiedene Meldung deutlich gemacht, 
daß User A eine Nachricht an ihn ge¬ 
schickt hat. Manche Mailboxsysteme 
zeigen auch noch an, wann diese 
Nachricht verschickt worden ist, wie 
lang die Message ist und noch vieles 
mehr. 

Die persönliche Message, in der Mail¬ 
boxszene mit PM abgekürzt, kann in 
unserem Fall nur der User B lesen. 


Was bieten Mailboxen? 

Die Anmeldeprozedur, das heißt der 
Login, muß jeder Mailboxbenutzer, 
der eine Box anruft, durchführen. Hier 
muß er zunächst seinen Systemnamen 
angeben und anschließend sein Pass¬ 
wort. Der Systemname, zum Beispiel 
»C.EIßNER«, ist jedem Benutzer im 
System bekannt. Das PW - Password 
- darf nur dem Benutzer selbst be¬ 
kannt sein, da dies sonst unter Um¬ 
ständen verheerende Folgen haben 
kann. Wenn ein PW bekannt wird, 
kann jeder, der das Password kennt, 
auf ihren Namen Nachrichten ver¬ 
schicken etc. 

Außer den PM’s kann jeder User im 
Mailsystem Nachrichten verschicken, 
die allen Benutzern zugänglich sind. 

Hier kann man zum Beispiel seinen al¬ 
ten Computer zum Kauf anbieten, 
Kaufgesuche aufgeben, Fragen stellen, 
oder nur einfach seine Meinung über 
ein gerade aktuelles Thema auslassen. 

Manche Mailboxen stellen ihren Usern 
Bretter zur Verfügung. Jedes Brett hat 
einen Namen, wie »Verkaufe«, »Su¬ 
che«, »Biete«, »Diverses« und so wei¬ 
ter. Bei der Vielfalt der Bretter sind 
keine Grenzen gesetzt. 

Der Vorteil von Brettern ist klar, Sie 
brauchen nur das zu lesen, was Sie 
auch wirklich interessiert. 


Mailbox System Nürnberg CPort 1) 

Abb.l 

Name ? C.EISSNER 



Kennwort ? . 




Guten Tag, Christian ! 



Ihr Anruf Nr. 54 




Angeschaltet am: 

Sa 31.01.B7, 15:43:14 


Letzter Zugang am 

: Di 23.12.86, 02:50:20 


Neue Einträge in: 




SYSINFD-D 

(19.01.) 

DIUERSES 

(31.01.) 

ATARI 

(31.01.) 

DATEX 

(09.01.) 

AMI GA 

(31.01.) 

C-64 

(23.01.) 

SYSTEM 

(31.01.) 

KIRCHE 

(22.01.) 

UNTERHALTUNG 

(22.01.) 

BOERSE 

(24.01.) 

UERANSTALTUNGEN 

(30.01.) 

CHARIUARI 

(19.01.) 

PROGRAMME 

(22.01.) 

SCHACH 

(03.01.) 

IBM 

(31.01.) 

GESUCHE 

(30.01.) 

Befehl: ENDE 




Anruf angenommen: 


15:43:09 


Login als C.EISSNER: 

15:43:14 


Augenblickliche Zeit: 

15:51:10 


Telefon-Uerbindungszeit: 

00:09:01 


Zeit als C.EISSNER: 

00:07:56 


Gesamtzeit als C. 

EISSNER: 

1 StundB, 4 Minuten. 

Auf Wiedersehen, 

Christian, and always remember: 

Populus vult dBCipi. The 

people like to 

bB daceived. 
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Große Datenmengen! 

Bretter und persönliche Nachrichten 
sind noch nicht alles, was eine Mail¬ 
box in ihrem Leistungsumfang offe¬ 
riert. Die sogenannten Fileboxen sind 
ebenfalls von großem Interesse. In den 
Fileboxen gibt es oft megabyteweise 
Texte, Kurzgeschichten, Anleitungen, 
etc. abrufbereit. Schon oft hat man auf 
diese Art sein Problem lösen können, 
da in der Filebox derselbe Problem¬ 
fall beschrieben war. 

Bei leistungsstarken Mailboxen, meist 
kommerziellen Boxen, gibt es selbst¬ 
verständlich noch vieles anderes mehr. 
Eine aufwendige Einrichtung stellt die 
Multiuserverwaltung dar, sowie die 
Konferenzschaltung. Wird die Mail¬ 
box von einem User genutzt, ist der 
Telefonanschluß belegt, das System 
kann keinen weiteren User mehr ver¬ 
arbeiten. Bei der Multiuserverwaltung 
gibt es dieses Problem nicht mehr. 
Wird die Mailbox angerufen, schaltet 
das System automatisch den Anrufer 
auf einen anderen Port. Der multitas- 
kingfähige Rechner kann deshalb meh¬ 
rere Benutzer auf einmal, also 
gleichzeitig, bedienen. Der Grund, 
weshalb diesen Service im Regelfall 
nur kommerzielle Mailboxanbieter ha¬ 
ben, liegt darin, daß der Rechner sehr 
stark beansprucht wird, und aus die¬ 
sem Grund leistungsfähig sein muß. 
Ein IBM AT Rechner reicht hier ge¬ 
rade noch aus, aber auch die Softwa¬ 
re wird stark beansprucht. 

Eine Art Nebeneffekt der Multiuser¬ 
verwaltung stellt die Konferenzschal¬ 
tung dar. Befinden sich mehrere 
Benutzer im Mailboxsystem, kann 
man über ein Kommando einen Dia¬ 
log anfordern. Die User können sich 
nun quasi über Computer unterhalten. 
Schon oft wurden dadurch Freund¬ 
schaften geschlossen. 


Der Datenschutz 


Kommen wir zu den unangenehmen 
Dingen eines elektronischen Briefka¬ 
stens, dem Datenschutz. Eine Mailbox 
wird von einem »SysOp« betreut. Der 


Systemoperator sieht sozusagen in der 
Mailbox nach dem Rechten, er er¬ 
mahnt User, die gegen die »unge¬ 
schriebenen Gesetze einer Mailbox« 
verstoßen. 

Grundsätzlich kann man sagen, daß 
dem Systemoperator in seiner Mailbox 
nichts unbekannt ist, er kann deshalb 
Ihre persönlichen Messages lesen und 
Ihr Passwort. Deshalb ist es ange¬ 
bracht, sich seine »Hausbox« genau 
auszusuchen. Man sollte aus nahelie¬ 
genden Gründen eine unseriöse Box 
meiden. Verwenden Sie also in jeder 
Mailbox ein anderes Passwort, um ei¬ 


nen eventuellen Mißbrauch seitens der 
Systemoperatoren auszuschließen. Bei 
den kommerziellen Mailboxen dürfte 
sich dieses Problem erübrigen. 

Nun wollen wir Ihnen noch einige Rat¬ 
schläge geben, wie Sie Kontakt mit ei¬ 
ner Mailbox aufnehmen: 

Als erstes sollte Ihr Akustikkoppler 
bereit sein und auf Originate stehen. 
Die Parameter-Einstellung ist oft 8N1, 
was soviel wie acht Datenbits, keine 
Parität und 1 Stopbit bedeutet. Schlägt 
Ihr Versuch mit dieser Einstellung 
fehl, versuchen Sie 7N1. Fast jede Box 
verwendet 8N1 beziehungsweise 7N1. 
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Welcome to DELPHI RDD - d 

Copyright (c) 1987 

General Uideotex Corporation 

Loflon at : 30-JAN-19B7 10:80:94 
Last Logon : 24-JAN-19B7 1B:02:5B 

12/09/86 Version. 

Welcome to tho DELPHI Conference System 
CONFERENCE» Who,Page,Join,Name,Exit? uiho 
GROUP LIST: 10:20:54 

- idle 

MHANFT 

AUAILABLE LIST: O - in conf 

DAWN, O, BOUDREAU, SUSUMU, GRAPHA, ESSOSAPA 
- AG in this areaU 

CONFERENCE» Who, Page, Join, Name, Exit? /uihois grapha 
ThBre is no Information on file for GRAPHA. 


Nachdem der Akustikkoppler richtig 
angeschlossen worden ist und die Pa¬ 
rameter übereinstimmen, müssen Sie 
nur noch die Telefonnummer der 
Mailbox kennen und die Box anwäh¬ 
len. Sollte die Box nicht gerade belegt 
sein, erscheint wahrscheinlich schon 
nach ein paar Sekunden die System¬ 
meldung mit der Aufforderung sich 
einzulogen, oder auf Deutsch, sich an¬ 
zumelden. Beachten Sie bitte, daß ei¬ 
nige Mailboxen die Eingabe von 
Return verlangen, bevor die Mailbox 
die Systemmeldung ausgibt. Sind Sie 
zum ersten Mal in einer Box, so ge¬ 
ben Sie bitte »Gast« ein. Bei einem 
Fehlschlag versuchen Sie bitte auch 
»NEU«, »GUEST«, »INFO«, »?« und 
»HILFE«. Um sich in der Telebox der 
Deutschen Bundespost einzulogen, 
müssen Sie »ID INF 100« und als Pass¬ 
wort »TELEBOX« verwenden. Abbil¬ 
dung 4 veranschaulicht diesen Prozeß. 
Ausreichend Telebox-Information 
übermittelt Ihnen der Befehl »INFO 
INFO«. Mehr über die Telebox im 
vierten Teil unserer Serie. 


Das Mindestangebot einer 
Mailbox 


Haben Sie vor, eine Mailbox ernsthaft 
zu verwenden, ist es von großer Wich¬ 
tigkeit, daß Sie eine Stammbox haben, 
bei der Sie mindestens jeden dritten 
Tag anrufen. Bei dem Aussuchen ei¬ 
ner Hausbox müssen Sie einiges be¬ 
achten, damit Sie dieses auch - und 
das wollen Sie ja — ernsthaft nutzen 
können. An Bedienungskomfort muß 
die Mailbox auf jeden Fall folgende 
Control Steuerzeichen verarbeiten 
können. Dies wären: 

Control S 

— Zum Anhalten der Textausgabe. 
Control Q 

— Zum Fortsetzen der Textausgabe. 
Control C 

— Zum Nachrichten überspringen. 
Control X 

— Zum Verlassen der Textausgabe. 

Die ersten beiden Controlzeichen wer¬ 
den, wie bereits in Folge eins bespro¬ 


chen, beim XON/XOFF Protokoll 
verwendet. Noch besser wäre es, 
wenn die Mailbox noch zusätzlich ein 
XMODEM-Protokoll verarbeiten 
würde. 

Das Abspeichern der Messages sollte 
in einer akzeptablen Geschwindigkeit 
vor sich gehen. Wartezeiten von mehr 
als einer halben Minute müssen Sie 
sich nicht gefallen lassen. Mittlerweile 
speichern viele Boxen die Nachrich¬ 
ten erst in die RAM-Floppy. Verläßt 
der User dann das System, wird ab¬ 
gespeichert. Wartezeiten werden so¬ 
mit vermieden. 

Bei der Textausgabe wäre es wün¬ 
schenswert, wenn diese im 80-Zei- 
chen-Modus erfolgt. Am vorteilhafte¬ 
sten wäre ein Befehl, der das Um¬ 
schalten zwischen vierzig und achtzig 
Zeichen zuläßt. 

Die meisten gewerblichen Boxen bie¬ 
ten diese Leistungen an. Bei privaten 
Mailboxen, also Systemen, bei denen 
keine Benutzungsgebühren verlangt 
werden, sollten Sie weniger streng 
sein, da der SysOp seine Box »nur so 
zum Spaß« betreibt. 


Das Mailbox System Nürnberg 

Eine kommerzielle Mailbox, die all 
dies erfüllt, stellt das Mailboxsystem 
Nürnberg dar, welches unter der Ruf¬ 


nummer 0911/330039 auf dem 300 
Baud-Anschluß 24 Stunden erreichbar 
ist. Der SysOp Matthias gehört noch 
zu einem der wenigen Systemopera¬ 
toren, die auch Fragen der User 
schnell beantworten. Das Mailboxsy¬ 
stem Nürnberg arbeitet mit einem aus¬ 
gereiften Befehlssystem, der GEO- 
Befehlsebene. XMODEM, sowie 
XON/XOFF ist ebenfalls vorhanden. 
In der Filebox gibt es zahlreiche Be¬ 
richte, Uploads aus anderen Boxen, 
Anleitungen zum Modembau etc. Zur 
Zeit wird die Mailbox auf Multiuser¬ 
verwaltung umgerüstet. Abbildung 
Nummer eins zeigt einen stark gekürz¬ 
ten Auszug aus der Box. Am besten, 
Sie schalten gleich Ihren Akustik¬ 
koppler auf 8N1,300 Baud und rufen 
an. Ganz billig ist diese Leistung je¬ 
doch nicht, rund 20 Mark pro Monat 
kostet Sie dies. Für Schüler und Stu¬ 
denten gibt es Sondergebühren. Bei 
den 20 Mark ist schon alles enthalten, 
Zeitgebühren kommen nicht mehr 
hinzu. 


Datex-P 


Nach einiger Zeit erleben Sie den gro¬ 
ßen Schrecken eines jeden DFÜlers. 
Die Telefonrechnung. Dies bringt uns 
schon zur nächsten Thematik, dem 
Datex-P Service der Deutschen Bun- 


130 PC 4*87 












Anduril 



Mörder- 

Jagd 



Unheimliche Mächte überziehen das Land 
mit Dunkelheit. Das magische Schwert Andu¬ 
ril, das die Macht hat, das Böse zu verban¬ 
nen, wurde zerschmettert. 

Wird es Ihnen gelingen, das gefährliche Höh¬ 
lensystem zu überwinden, und die sieben Tei¬ 
le Andurils wieder zusammen zu bringen? 
Fünfundsiebzig Höhlen und Super- Grafik er¬ 
warten Sie. 


Lord Ghosthall liegt tot in seinem Schloß und 
ausgerechnet Sie sollen die Ermittlungen 
führen. Wer war der Mörder? War es der But¬ 
ler oder wurde der Lord vom Hausarzt ge¬ 
meuchelt? 

Ein Denk- und Strategiespiel vom Feinsten. 
Stehen Sie Ihren Mann bis zur Anklage. 



Auf der neuen GAMEBOX finden Sie pro 
Ausgabe zwei tolle Spiele aus den Bereichen 
Strategie-, Action-Adventure und Reaktions¬ 
spiel. 

Die GAMEBOX kostet pro Ausgabe 19,- DM, 
als Kassette bzw. 29,- DM als Diskette zzgl. 
3,- DM Porto und Verpackung. Sie können 
die GAMEBOX per Vorkasse oder Nachnah¬ 
me bestellen. Im Falle der Nachnahme kom¬ 
men die entsprechenden Nachnahmegebüh¬ 
ren hinzu. 


Bitte Bestellkarte benutzen 

Seit Jahrtausenden gibt es die Legende vom 
Dungeon Doom. Dort in den kalten Gängen 
der Katakomben sollen sich unglaubliche 
Schätze befinden. 

Wird es Terry Mc’Style gelingen, den unbe¬ 
kannten Gefahren des Labyrinthes zu trotzen, 
und den Schatz zu finden! 
Menuegesteuertes Grafik-Adventure der Ex¬ 
traklasse. 


Barney Ballhunter treibt wieder einmal sein 
Unwesen. Mit einem Vorschlaghammer be¬ 
waffnet jagt er Luftballons. 

Ballhunter ist ein Action-Geschicklichkeits- 
Spiel in 100% M-Code. Prächtige Farbgrafik, 
rasante Action und gewitztes Spielgesche¬ 
hen machen aus Ball Hunter ein Erlebnis. 


DMV-Verlag 

Fuldaer-Straße 6 ■ 3440 Eschwege ■ Telefon (0 56 51) 87 02 
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despost. Datex-P ist von den Kosten 
her für einige Gruppen billiger, da 
Datex-P seine Gebühren innerhalb 
Deutschlands entfernungsunabhängig 
berechnet. 

Es ist also völlig egal, ob Sie zum Bei¬ 
spiel von Nürnberg nach München, 
oder von München nach Hamburg Da¬ 
ten übertragen. Die Gebühr bleibt die 
gleiche. Für uns kommt nur der 
Datex-P 20 F Service in Frage. Das 
»P« bedeutet, daß die Daten per Pa¬ 
ket übermittelt werden. Die Daten 
werden in international genormten 
»Paketen« von 128 Byte Länge 
»verpackt«. 

Verpackt werden die Daten von einem 
PAD, den Sie über den Fernsprecher, 
daher Datex-P 20 F, anwählen kön¬ 
nen. Es gibt mittlerweile in jeder grö¬ 
ßeren Stadt einen PAD-Rechner, 
insgesamt sind dies 17 Stück. 

Datex-P 20 F ist, wie schon erwähnt, 
erheblich billiger. Billiger jedoch nur, 
wenn Sie Daten weit übertragen wol¬ 
len. Bei Nahverbindungen sind Sie 
nach wie vor mit dem Telefon besser 
bedient. Ein kleines Beispiel: Bei ei¬ 
ner Verbindung in die USA, kann 
Datex-P gegenüber dem Fernsprecher 
bis zu 85% billiger sein. 

Wie werden Sie nun aber Datex-P 20F 
Benutzer, und was kostet dies? Um 
überhaupt mit Datex-P Daten vermit¬ 
teln zu können, benötigen Sie eine 
NUI, die Network User Indentifica- 
tion. Die NUI müssen Sie bei der Bun¬ 
despost beantragen, Sie kostet 15,— 
DM monatlich. 


Eine NUI besteht aus Teil A und Teil 
B. Der Teil A enthält acht Zeichen, 
wobei Sie sieben davon selbst wählen 
können, da der erste Buchstabe ein 
»D« sein muß. Das »D« zeigt an, daß 
Sie aus der Bundesrepublik Deutsch¬ 
land sind. 

Nach einem Antrag auf Datex-P- 
Benutzung erhalten Sie dann den Teil 
B. Teil B ist Ihr Passwort, das Sie wie 
Ihren Augapfel hüten sollten, da, wenn 
jemand Ihren Teil A und Teil B kennt, 
auf Ihre Kosten in aller Welt herum¬ 
telefonieren kann. Schon oft gab es 
Fälle, wo Hacker NUI’s erhackt 
haben. 

Die Post meint hierzu, daß das Er- 
hacken einer NUI absolut unmöglich 
sei, andere wiederum sind der Mei¬ 
nung, man könne sich die NUI ganz 
einfach aus dem PAD »holen«. 

Was Datex-P genau kostet, entnehmen 
Sie bitte der Abbildung drei. Erkun¬ 
digen Sie sich bitte genauer in einem 
Telefonladen der Deutschen Bun¬ 
despost. 


DELPHI kurz angeschnitten! 

Eine amerikanische Mailbox der Su¬ 
perlative ist DELPHI. DELPHI ist 
über Datex-P ereichbar und kostet für 
Europäer acht Dollar die Stunde. Ab¬ 
bildung drei zeigt die Systemmeldung 
von DELPHI. In diesem Artikel ist es 
unmöglich, alles über DELPHI zu 
schreiben, was es zu schreiben gibt. 
Wenden Sie sich doch bitte direkt an 
DELPHI. Bei folgender Adresse er¬ 
halten Sie ausreichend Information: 
DELPHI 

General Videotex Corp. 

3 Blackstone Street 
Cambridge, MA 02139 USA 
Schon sind wir wieder am Ende un¬ 
seres Berichtes »Mein Computer un¬ 
terhält sich« angelangt. In der nächsten 
und letzten Folge dieser Serie wollen 
wir noch etwas detallierter Informa¬ 
tionen über Datex-P geben. Ebenso 
haben wir an Mailboxanbieter ge¬ 
dacht. Wer weiß, vielleicht sind Sie 
auf den Geschmack gekommen und 
wollen eine Mailbox in’s Leben rufen! 

(Christian Eißner) 


TELEBOX-Systam der Deutschen Bundespost Abb.4 

Bitte vorstellen: 

> ID INF100 
Passwort: TELEBOX 

1B.4T1C15) 

CEs ist schon ein Benutzer mit Ihrem Namen am System.) 
ftngeachaltet um/am: 19.04 / 20.09.19B6 
Letzter Zugang um/am: 18.42 / 20.09.19B6 

Willkommen im TELEBDX-Systeml 

Ein flenue von INFO-Dateien erhalten Sie mit dem Befehl INFO INFO 


The Programmer’s Toolbox 

PROFESSIONELLE ENTWICKLUNGSWERKZEUGE 
Prospero Software - Compiler für höchste Ansprüche 


LAHQUAGES FOR MICROCOMPUTER PROFESSIONAL 

Pro Pascal: PC und Compatiblen DM 999,- 

AtariST DM429,- 

Joyce PCW DM 239,- 

Pro Fortran: Joyce PCW DM239,- 

Pro Fortran 77; PC und Compatiblen DM 1.439,- 


alle Preise incl 


Pieter Wade: 6246 Glashütten, Zum Talblick 44 


Softwarehandel F.G. Weber 

Hallerhüttenstraße 6 • 8500 Nürnberg 40 

Probleme mit Speedlockgeschützter Software ? 

!!!! Nein !!!! 

SPEEDTRANS PLUS 

Weiterhin günstiger Preis 39,90 DM 
Mit deutscher Anleitung. 

Händleranfragen erwünscht. 


F. G. Weber 

Hallerhüttenstr. 6 • 8500 Nürnberg • Tel. (0911) 4991 03 


Autorisierter Fachhandler der Firma ZS-Soft 
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Kurse—i 



Diese Folge unserer CAD-Serie ist besonders für Tüftler 
gedacht, für Programmierer, die gerne experimentieren, 
um das Beste aus Ihrem Computer System zu machen. In 
dieser Folge geht es um die technischen Befehle wie 
»clear« und »end« und es geht darum, das CAD-System an 
die Peripheriegeräte Ihres spezielles Systems anzupassen 
- an Ihren Drucker und Floppydisk, an Ihr Kassettendeck 
oder gar an Ihr Festplattenlaufwerk. Hier können Sie sich 
also programmtechnisch voll entfalten. 

Zu dieser Hardware gehört natürlich auch eine Software¬ 
anpassung und eine Integration der Fremdelemente in das 
eigentliche CAD-System. Es wäre z.B. ideal, wenn Sie ei¬ 
nen sehr schnellen Zugriff auf externe Daten - sprich 
CAD- Bibliothekselemente — erreichen könnten. Eine Da¬ 
tenbank und die dazugehörigen Systembefehle oder auch 
eine schnelle Datenverwaltung wären für diese Anpassung 
an unser System bestens geeignet. Je schneller und direk¬ 
ter der Datenzugriff ist, desto mehr Freude werden Sie mit 
der CAD haben. 

Aber auch mit der Standardperipherie des CPC 464, dem 
Kassettenrekorder, funktioniert das CAD-System natürlich 
recht ordentlich. Nur bei Datenzugriffen auf die zu schaf¬ 
fende Formbibliothek werden Sie Zeitprobleme bekommen 
und verständlicherweise läuft das System dadurch nicht op¬ 
timal. Für unsere Einführung jedoch reicht der Kassetten¬ 
rekorder aus, und die Programmliste wird sich standard¬ 
mäßig an dieser einfachen Peripherie orientieren. 


Um in der CAD semiprofessionell zu arbeiten, benötigen 
Sie allerdings mindestens einen Floppydisk und natürlich 
einen Drucker. Wünschenswert wäre auch eine Speicher¬ 
erweiterung auf ca. 128K. Die Softwareanpassung dieser 
Geräte an das vorliegende System und besonders die Da¬ 
tenverwaltung müssen Sie entsprechend Ihren Vorstellun¬ 
gen und Möglichkeiten selber vornehmen. Die Schnittstellen 
dafür sind schon in der Programmliste vorgesehen und die 
Einbindung ins System dürfte kein Problem sein. 

Obwohl wir schon bei »Folge Vier« unseres Lehrgangs an¬ 
gekommen sind, haben wir bis jetzt eigentlich noch keine 
CAD-Befehle kennengelernt. Das ist leider unvermeidlich, 
denn man muß erst die technischen Voraussetzungen für 
ein solches System schaffen. Hinter diesem Projekt steckt 
nämlich - was auf Anhieb kaum zu glauben ist — ein Plan. 
Auch hinter der Wahl der Befehlskürzel steckt eine gewisse 
Logik. Vielleicht haben Sie es schon gemerkt - z.B. fan¬ 
gen alle Löschbefehle systemweit mit »c« an und »e« beendet 
systemweit alle Verarbeitungsvorgänge. Ebenfalls fangen 
alle » Design-Befehle« mit »d« und alle »Grafik-Befehle« 
mit »p« (für paint — malen) an. Dies erleichtert Ihnen hof¬ 
fentlich das Erlernen der CAD-Befehle. 

Nun zu unseren technischen Befehlen, die zugegeben et¬ 
was »trocken«, aber trotzdem sehr notwendig sind. Unser 
erster Systembefehl ist »clear screen« - (cs). Mit ihm - 
wie könnte es anders sein — wird der Bildschirm gelöscht. 
Man wundert sich wahrscheinlich nur, warum wir 500 Zei¬ 
len dafür vorgesehen haben. Das geschieht mehr aus Grün¬ 
den der Programmstruktur als aus irgendeiner bestehenden 
Notwendigkeit. Wir haben auf jeden Fall Platz, um später 
noch Meldungen oder Prüfungen einzubauen. 

Mit dem Befehl »er« — clear and reset — haben wir das 
gleiche wie bei »cs« - nur ganz anders; Entschuldigung 
— ich wollte immer schon diese dumme Redesart irgend¬ 
wie anwenden. Auf jeden Fall kann ein »er« Befehl mehr 
als ein »cs« Befehl. Mit »er« fassen wir zum erstenmal ein 
Designteil an — nämlich die pxy(lr,pmax) Tabelle (Array). 
Sie ist das wichtigste CAD-Element überhaupt, denn sie 
enhält alle Koordinaten unserer zukünftigen Formen. Die 
Hauptbeschäftigung der CAD besteht darin, diese Tabel¬ 
len aufzubauen und durch Datenzugriffe zu speichern oder 
zu laden (mehr darüber in der nächsten Folge). Mit einem 
generellen »er« wird u.a. diese Tabelle gelöscht. Auch hier 
werden symbolische Namen benutzt (siehe Folge 2). Es 
heißt also: 

FOR p = 1 to pmax 

und nicht 

FOR p = 1 to 200 

denn die Tabelle kann später durch eine Speicherplatzer¬ 
weiterung vergrößert werden. Zu dieser Tabellenlöschung 
kommt ein CLS und ein erneutes Anzeigen des Menues, 
um deutlich zu machen, daß eine ganz neue Verarbeitung 
stattfindet. 
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10000 

’crad clear screen - cs 

C 2504] 


12690 

CLOSEOUT 

£902] 

10010 

» 

[1173 


12700 

1 

£1173 

10020 

CLS 

[913 


12900 

RETURN 

[555] 

10030 

f 

[1173 


13000 

' he 1p - hp 

£576] 

10490 

RETURN 

C 555 3 


13010 

• 

£117] 

10495 

• 

11173 


13020 

* 

[ 117] 

10500 

' cmd clear & reset - er 

[13533 


13030 

INPUT "t/d/s/p-emd";resp* 

[ 19003 

10510 

' 

[1173 


13040 

resp* = LOWER*(resp*) 

[19073 

10520 

9 

[1173 


13050 

t 

£117] 

10530 

CLS 

[91 3 


13060 

GOSUB 61000 

[9273 

10540 

FOR f = 1 TO 4 

[9873 


13070 

hstart=0:hend = 0 

[7321 

10550 

FOR p = 1 TO pmax 

[16023 


13080 

V 

£ 117] 

10580 

pxy(f,p) = 0 

[7843 


13090 

IF resp* = "t" THEN hstart=1:hend=9 

[28453 

10570 

NEXT p 

[3643 


13100 

IF resp* = "d" THEN hstart=10:hend=2 

£25823 

10580 

NEXT f 

[3743 


t 



10590 

• 

[1173 


13110 

IF resp* = "s" THEN hstart=22:hend=2 

£28353 

10600 

* 

[1173 


7 



10610 

GOSUB 2000: ’new menu 

l12663 


13120 

IF resp* = "p" THEN h3tart=28:hend=4 

£39283 

10620 

• 

[1173 


2 



10990 

RETURN 

[5553 


13130 

IF hstart = 0 THEN hstart * 1: hend= 

£34683 

10995 

f 

[1173 


42: 'all emds 


11000 

’ cmd hard eopy - hc 

[17853 


13140 

• 

£117] 

11010 

f 

£1173 


13150 

FOR c = hstart TO hend 

£14313 

11020 

INPUT "printer on j/n"jresp* 

[39603 


13160 

9 

£1173 

11030 

GOSUB 61000 

[927 3 


13170 

PRINT emdtext*<c)j":";emdnam*<c> 

£14751 

11040 

IF resp* <> "j" THEN GOTO 11990 

£16003 


13180 

* 

£1173 

11044 

9 

£1173 


13190 

GOSUB 61100 

£9233 

11045 

' Bitte Ihre eigene HC-Routine 

£46613 


13200 

9 

£1173 


hier einbauen. 



13210 

NEXT c 

£3813 

11050 

9 

£1173 


13220 

9 

£1173 

11060 

’ z.B. CALL &A900 

£6023 


13490 

RETURN 

£5553 

11070 

’ 

£1173 


13495 

1 

£1173 

11990 

RETURN 

£5553 


13500 

’1oad screen - 1s 

[15513 

11995 

’ 

£ 1173 


13510 

9 

[1173 

12000 

’ save screen - ss 

£8533 


13520 

INPUT "load screen j/n";resp* 

[28783 

12010 

1 

£ 1173 


13530 

resp* = LOWER*(resp* ) 

£19073 

12020 

1NPUT "load tbtape j/n":resp* 

£23101 


13540 

'9 

£117] 

12030 

IF resp* = "n" THEN SPEED WRITE 1 : GO 

[46493 


13550 

IF resp* = "n" THEN GOTO 13900 

£26653 

SUB 61000 : GOTO 12200 



13560 

» 

£1173 

12040 

’ 

[1173 


13570 

GOSUB 61000 

£9273 

12050 

GOSUB 61000 

[9273 


13580 

IF cmd*="" THEN INPUT "file "jemd*: 

£28023 

12060 

9 

£1173 


GOSUB 

61000 


12065 

’ Diese Routine ist als 

[30263 


13590 

CLS 

£913 


CPC 464 Vorschlag gedacht. 



13600 

9 

£1173 

12Ü70 

LOAD "!turbosave":USING 

[ 17453 


13610 

file* = " ! " + cmd* 

£8483 

12080 

9 

£1173 


13620 

9 

£1173 

12090 

• 

£1173 


13630 

PRINT "press play & key" 

£19683 

12100 

PRINT "Insert tape for save" 

£21303 


13640 

WHILE INKEY* 3 "" : WEND 

£16073 

12110 

GOSUB 61100 

£9233 


13650 

* 

£ 1173 

12120 

9 

£ 1173 

13660 

GOSUB 61000 

£9273 

12200 

IF cmd* ="" THEN INPUT "file "jemd*: 

£2485 3 


13670 

9 

[1173 

GOSUB 

61000 



13680 

LOAD file*,&C000 

[8933 

12210 

PRINT "press ree/play L key" 

£17133 


13690 

9 

[1173 

12220 

WHILE INKEY* = "”: WEND 

[ 16073 


13700 

9 

[1173 

12230 

f 

£ 1173 


13900 

RETURN 

[5553 

12240 

GOSUB 61000 

[9273 


13910 

• 

[1173 

12250 

’ 

[1173 


14000 

' 1oad design - 1d 

[13073 

12260 

f11e*= "!" +cmd* 

[848 3 


14010 

9 

[1173 

12270 

' 

[1173 


14020 

IF cmd*="" THEN INPUT "file ";cmd*: 

[28023 

12280 

SAVE f ile*,B,&C000,&4000 

£ 13123 


GOSUB 

61000 


12290 

• 

£1173 


14030 

PRINT "press play/fckey" 

[14413 

12300 

’deactive turbosave 

[ 10853 


14040 

WHILE 1 NKEY*=" ": WEND 

[ 16073 

12310 

POKE &BC98,&CF : POKE &BC99.&EA 

£5803 


14050 

GOSUB 61000 

[9273 

12320 

POKE &BC9A, S<A4 : POKE &AC07.&C9 

£8563 


14060 

file* ="! "+cmd* 

[848 3 

12350 

RETURN 

£5553 


14070 

OPEN IN file* 

[ 10623 

12500 

’ save deslgn - sd 

[8133 


14080 

• 

[1173 

12510 

9 

£1173 


14090 

FOR lr = 1 TO 4 

£5913 

12520 

IF cmd$="" THEN INPUT "file ";cmd*: 

[28023 


14100 

FOR p = 1 TO pmax 

[ 16023 

GOSUB 

61000 



14110 

IF EOF <> 0 THEN GOTO 14200 

£10273 

12530 

’ 

[1173 


14120 

INPUT #9, pxy(1r,p) 

[11613 

12540 

PRINT "press rec/p1ay/&key" 

[ 18253 


14130 

9 

£1173 

12550 

WHILE INKEY*="":WEND 

£ 16073 


14140 

NEXT p 

£3643 

12560 

GOSUB 61000 

[927 3 


14150 

NEXT lr 

[406 3 

12570 

file* =”! "+cmd* 

£8483 


14160 

9 

C1173 

12580 

OPENOUT file* 

£781 3 


14200 

CLOSEIN 

[7523 

12590 

• 

£ 1173 


14490 

RETURN 

£5553 

12600 

FOR lr = 1 TO 4 

£5913 


14495 

’ 

£1173 

12610 

’ 

[1173 


14500 

' end - en 

£6473 

12620 

FOR p = 1 TO pmax 

C16023 


14510 

9 

£1173 

12630 


£ 1173 


14520 

’ 

£1173 

12640 

PRINT #9, pxy < lr, p) 

[ 18833 


14530 

progend = 1 

£5443 

12650 

♦ 

[1173 


14540 

f 

£117] 

12660 

NEXT p 

[364 3 


14900 

RETURN 

C5553 

12670 

NEXT lr 

£406 3 


14910 

* 

[1173 

12680 


£1173 
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BEHERRSCHEN SIE DAS 

Chaos 

mit Software von “BVTE fTlE" 


Vereinsverwaltung 


548,00DM Autovermietung 


2.950,00DM 



Verwaltet bis 65.000 Mitglieder, 25 verschiedene Listen (Drucker/Monitor), 
Beitragsverwaltung nach Schlüsseln, Beitragsverbuchung, aktuelle Soll/Ist- 
Anzeige, bis 50 Abteilungen, pro Abteilung bis zu 50 Unterabteilungen, 
Druck von Laserschriften - Zahlscheinen - Kassiererlisten, automatische 
Sollstandserhöhung, Jahresabschluß, integriertes Mahnwesen (4 Stufen), 6 
verschiedene Hauptstatistiken, Serienbrieferstellung - Rundschreiben - Eti¬ 
kettendruck nach 25 Untergruppierungen, Anbindung an nachfolg. FIBU 
möglich, usw. Komplettpreis mit FIBU 798,00 DM 

Finanzbuchhaltung 548,00 DM 

Anzahl Sachkonten - Debitoren - Kreditoren nur abhängig vom Daten¬ 
träger, Summen und Saldenlisten, Umsatzsteuervoranmeldung, Konten¬ 
druck, Monats- und Jahresabschluß, Salden¬ 
vortrag, BWA, Einnahme-Überschußrech¬ 
nung, usw. 

Programmverwaltung 98,00 DM 

Verwaltet bis zu 26 Programme auf Ihrer Fest¬ 
platte, einfache Installation, direkter Pro¬ 
grammaufruf, kehrt nach Programmende 
wieder ins Hauptmenü zurück, automatische 
Datums- und Zeitansage, direkter Aufruf von 
Formatier- und Kopierprogramm, abarbeiten 
von Stapeldateien, etc. 

Adreßverwaltung 298,00 DM 

Anzahl nur abhängig vom Datenträger, Ein¬ 
gabemaske flexibel, rechnende Felder, viel¬ 
facher Listendruck, Etikettendruck. Informa¬ 
tionsfelder, offene Schnittstelle, arbeitet mit 
«Wordstar« und »Euroscript« und anderen 
Textverarbeitungsprogrammen zusammen, 
unsere Terminverwaltung kann eingebunden werden, Serienbrief, usw. 

Tenninverwaltung 148,00 DM 

Verwaltet in Verbindung mit unserer Adreßverwaltung Ihre Termine, auf Ab¬ 
ruf automatische Terminanzeige mit Zeit- und Datumsanzeige, Gesprächs¬ 
partner und den dazugehörigen Notizen, Terminliste (Drucker/Monitor), 
Kalender installiert, etc. 


Festplatte 20 MB bis 2.000 Fahrzeuge. 

Verwaltet alle mit der Vermietung von Autos zusammenhängenden Daten 
wie: Fahrzeuge, Mieter, Versicherung, Vermittler, Mietdauer, Km-Leistung, 
Kostenabrechnung, Provisionsabrechnung, Rentabilitätsrechnung, Rech¬ 
nungserstellung, vielfacher Listendruck wie: offene Postenliste, TÜV-Liste, 
Fahrzeugliste, usw., anpassen von Formularen möglich, alle Daten werden 
gespeichert. 

Reisebüroverwaltung 1.490,00 DM 

Eingabe, Änderung und Löschen von Geschäftsvorfällen, Kundenvorgänge, 
Statistik, Rechnungs- und Bestätigungsdruck, Listendruck von: Buchungen, 
offene Anzahlungen, geleistete Anzahlungen, Außenstände, Abreisedatum, 
Rückreisedatum, Reisepapierausgabe, Veran¬ 
stalter, Kundenkartei, Reiseversicherungen, 
Buchungsnummem, Geburtstagsliste, etc. 

Lohn/Baulohn ab 3.150,00 DM 

Lohnprogramm in verschiedenen Ausbau¬ 
stufen, geprüft von Krankenkassen und der 
Oberfinanzdirektion München, M & T-Soft- 
warepreis 1984. 

FIBU II 

mandatenfähig ab 2.450,00DM 

Bedienungsfreundliche Finanzbuchhaltung, 
bis 999 Mandanten auf Festplatte möglich, 
Dialogverbuchung, Sachkonten - Debitoren - 
Kreditoren unbegrenzt, mehrere Absummie¬ 
rungskreise, automatische Skonten Verbu¬ 
chung, Stapelbuchungen, Tagesstatus, BWA, 
G u. V, Zahlungsverkehr, Bilanz, usw. 

Fakturierung/Auftrag ab 1.500,00 DM 

Kunden- Lieferanten- Artikelstamm, Erstellung von Angebot-Auftagsbestä¬ 
tigung - Lieferschein - Rechnung - Gutschrift, Bestellwesen Lagerwirt¬ 
schaft, Vertreterabrechnung, Anbindung an FIBU möglich, alle Vorgänge 
werden auf Platte gespeichert. 


Bisher wurden folgende Komplettlösungen von uns erstellt: 
Vertreterabrechnung im Verlagswesen, Auftragsabwicklung für ver¬ 
schiedene Branchen, Reisebüroverwaltung, Fahrzeugvermietung, 
verschiedene Kalkulationsprogramme, Tourenoptimierung, (Paket 
für Versicherungsvermittler in Vorbereitung). 

Außerdem vertreiben wir: 

»EUROSCRIPT« (Textverarbeitung mit Trennhilfe, Rechtschreibe¬ 
prüfung und Grafikeinbindung in den Text), »TAS +« (relationale 
Datenbank), »dBASE III«, »Multiplan«, »Wordstar«, »Open Access«, 
etc. 


Programme für die Schneider-CPC-Rechner und JOYCE: 

FIBU 278,00 DM, Auftrag 398,00 DM, Adreß/Text 98,00 DM, Verein 
198,00 DM. 

Achtung Händler und Turbo-Pascal Programmierer! 

Wir bieten Ihnen die SOURCECODES incl. COPYRIGHT unserer 4 
Programme, die wir für die Schneider CPC’s und den JOYCE ent¬ 
wickelt haben, zu guten Konditionen an. 

Händlerfragen erwünscht! 


“BVTE mE“ 

COmPUTERSVSTEdlE 


Wilhelmstraße 7 • 5240 Betzdorf/Sieg * Telefon (02741) 23537 








I~Kurse 


Mit dem Befehl »hc« — hard copy — kann ich Ihnen lei¬ 
der nicht weiterhelfen. Mit »hc« soll der Bildschirminhalt 
auf einen angeschlossenen Drucker ausgegeben werden. 
Es gibt so viele verschiedene Drucker und Übertragungs¬ 
möglichkeiten, daß wir darüber keine Aussage machen kön¬ 
nen. Wenn Sie aber einen Drucker besitzen, haben Sie mit 
Sicherheit schon eine eigene oder fremde Routine, die die¬ 
sen »Hard-copy — Vorgang« für ihren speziellen Drucker 
erledigt. Ersatzweise können Sie u.a. die Hardcopy-Routine 
in Heft 5/86 von Schneider CPC International verwenden. 
Auf jeden Fall sollten Sie vorher immer die Fremdrouti¬ 
nen laden - ggf. mit Basiclader - und dann erst das ei¬ 
gentliche CAD-System. Bauen Sie nun den entsprechenden 
»CALL-Befehl« in die Zeilen 11000-12000 ein. Die CMD- 
Steuerung stößt diese Routine dann automatisch an. Übri¬ 
gens, in Heft 10/85 — lang ist es her — gab es eine Routi¬ 
ne zum Aufbau eines Buffers für den Drucker. Dies ist 
vielleicht für die Benutzer eines CPC6128 interessant — 
denn die Routine benötigt 12K Speicherplatz. 

Mit den Befehlen »Load screen« — (ls) und »Save screen«- 
(ss) gibt es auch ein paar Probleme. Wie schon gesagt, diese 
Folge ist für Tüftler gedacht. Also tüfteln Sie! Wenn Sie 
einen CPC 464 haben, erfolgt das Abspeichern der 16K 
des Bildschirms sehr langsam. Mit einem CPC 664 oder 
6128 oder mit einem Floppy ist das alles eine Sekunden¬ 
sache, aber mit einem Kassettendeck ist es schon sehr zeit¬ 
raubend. Für Kassettenrekorderbenutzer gibt es aber eine 
Abhilfe. Es ist wiederum eine schöne Routine aus Heft 1 /86, 
mit der man die 16K in nur zwei Blöcke aufteilen und die 
Baudrate auf 3600 erhöhen kann. Damit geht das Abspei- 
chem einigermaßen schnell. Im Programm nehmen wir die¬ 
se Möglichkeit wahr. Es ist aber nur als Vorschlag gedacht. 
Wenn Sie diese Routine nicht besitzen oder das erhöhte »Re¬ 
ad/Write-Error-Risiko« nicht eingehen wollen, dann kön¬ 
nen Sie diese Routine einfach übergehen. Interessant wäre 
auch vielleicht das Programm »Bildschirmkompressor« aus 
Heft 9/86, das Sie als Modul ins System einbauen können 
— wenn Sie ein wirklicher »Tüftler« sind. 

Besitzer eines CPC 664/6128 oder eines Floppydisks müs¬ 
sen diese Save/Load-Routinen entsprechend ihren Speicher¬ 
medien und deren »Controller« natürlich ändern, aber wie 
schon gesagt, dürfte das kein Problem sein. Die Save/Load- 
Routinen verlangen selbstverständlich einen Namen, mit 
dem das Bild abgespeichert werden soll — also z.B. 
ss:Landschaft und beim Wiederladen ls:Landschaft. 

Hat man einen CPC 464/664, steht man auch ein wenig 
mit dem Befehl »Help«-(hp) auf Kriegsfuß. Die ideale Hil¬ 
fefunktion wäre bzw. ist die Menuemaske mit dem Befehls¬ 
vorrat nochmals zu zeigen. Das kann man am elegantesten 
mit einem »Screen Swap« durchführen. Besitzen Sie einen 
CPC 6128, sollten Sie diese Möglichkeit wahmehmen. Da¬ 
bei wird einfach der Grafikbildschirm mit dem Menue aus¬ 
getauscht — ohne das irgend etwas verloren geht. Mit einem 
CPC 464/664 kann man auch einen »Screen Swap« vor¬ 
nehmen. Anleitungen dazu finden Sie in »Data Beckers 



Tips & Tricks Band 2«, das auch eine »Grafik-Hardcopy 
Routine« für den Epson Drucker enthält. Leider benötigt 
man dazu 16K Speicherplatz, also ist die Sache im Prinzip 
uninteressant. Wie gesagt, unser CAD-System wird in der 
Endstufe über 40K Platz belegen. Ohne einen größeren 
Speicher könnte man diesen »Swap« gar nicht durchfüh¬ 
ren. Ein CAD-System ist eben platz- und CPU-zeitintensiv. 

Um uns mit der »Help-Funktion« weiterzuhelfen, zeigen 
wir eben die Befehle zeilenweise an. Nach dem Befehl »hc« 
kommt die Meldung »t/d/s/p-emds«. Man kann also wäh¬ 
len, ob man nur die technischen, die Design-, die Screen- 
oder die Paint-Befehle sehen will. Wählt man keine dieser 
Möglichkeiten, bekommt man alle zu sehen. Das ist nicht 
besonders elegant, und ich würde diese Funktion auch nicht 
benutzen. Sinnvoller wäre es, bei der Arbeit eine Hard- 
Copy des Menues als eine Art Handbuch zur Seite zu haben. 

Trotz Schwierigkeiten, gibt es auch schöne Kommandos. 
Die Befehle »Save Design« — sd und »Load Design« — 
ld sind die besten im technischen Block. Besonders, wenn 
Sie einen Floppy-Anschluß haben,- werden Sie die Wirkung 
dieser Design-Befehle schätzen lernen. Mit diesen Kom¬ 
mandos speichern und laden Sie die von Ihnen entwickel¬ 
ten Formen oder Designs aus der Formbibliothek (das 
Thema der nächsten Folge). Dieser Vorgang könnte fol¬ 
gendermaßen aussehen: 

ld: Berge 
lc, dm 

(mit »lc« wird das Design am Bildschirm sichtbar und mit 
»dm« wird die Form auf die gewünschte Stelle auf den Bild¬ 
schirm gebracht). 

ld:Baum 
lc, dm 
ld:Haus 
lc, dm 
ld: Straße 
lc, dm 
ld:Auto 
lc, dm 
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und schon haben Sie eine Landschaft mit Bergen, Bäumen, 
Häusern, Straßen und Autos aufgebaut. Wir haben die 
Mehrzahl benutzt — Bäume, denn einen einmaligen De¬ 
sign (Baum) auf dem Bildschirm zu duplizieren, ist in der 
CAD kein Problem. Diese schnell erstellte Landschaft kön¬ 
nen Sie dann mit den grafischen Befehlen noch nachbes- 
sem. Bei einem technischen CAD-Einsatz wird der Vorgang 
ein wenig anderes aussehen: 


ld:Schraube-sf4311 
lc, dm 

ld: Flache - a7293 
lc, dm 

ld: Bogen — cr8755 
lc, dm 

usw. 


bis ein ganzes Maschinenteil auf den Bildschirm gebracht 
worden ist. Danach kann das Teil vergrößert oder verklei¬ 
nert, gedreht oder verschoben werden. Bei diesen »Sd/ld«- 
Befehlen kommt es darauf an, eine möglichst umfangrei¬ 
che »Design-« oder Formbibliothek aufzubauen. Fertige 
CAD-Systeme liefern normalerweise diese Form- oder 
Symbolbibliotheken, entsprechend dem Bedarf des Benut¬ 
zers sofort mit. Beispielsweise gibt es Formbibliotheken 
für Architekten mit genormten Tür- und Fenstersymbolen 
oder Designbibliotheken für Flugzeug- oder Autokonstruk¬ 
teure etc. 

Sie sollten also hier Ihre eigene Form- oder Designbiblio¬ 
thek nach Ihren Wünschen und Vorstellungen aufbauen. 
Egal, ob die Designs elektronische Symbole für Bauele¬ 
mente oder landschaftliche Formen darstellen, wichtig ist 
nur, daß diese verschiedenen Designs gut katalogisiert und 
schnell abrufbar sind. Hierfür kann — wie bereits gesagt 
— ein Floppy und ein gutes Datenverwaltungsprogramm 
oder eine Datenbank bestens eingesetzt werden. Bei einem 
Kassettendeck ist es verständlicherweise schwieriger die¬ 
se Bibliothek aufzubauen, aber es geht auch relativ gut, 
wenn man einen Katalog mit einem »Tape-Anfangscounter« 
führt. Eine Freude ist es aber erst mit einem Floppy. 

Da wir von Freude sprechen — es gibt auch einen Befehl, 
der nach ein paar Stunden Arbeit vor dem Bildschirm gut 
tut; nämlich der Befehl »en« — Ende. Es ist der letzte Be¬ 
fehl, den Sie eingeben können, denn nach dem Ende kön¬ 
nen wir nichts mehr machen — oder doch? Nach dem 
»Ende« dieser Folge erscheint die »Folge Fünf« und darin 
werden wir dann anfangen, unsere Designbibliothek auf¬ 
zubauen und das eigentliche CAD-System in Angriff zu 
nehmen. Bis dahin haben Sie ja noch Zeit, den technischen 
Block einzutippen und ein wenig zu »tüfteln«. 

Übrigens — wie schon von einigen Lesern richtig erkannt 
worden ist heißt es »load design ld« und nicht »load screen 
ld« in der Menuemaske. Bitte korrigieren Sie diesen Tipp¬ 
fehler in Zeile 1230. (Rainer Kontny) 
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I—Tips & Tricks 



DFORIYI 


Programm zum Formatieren von Disketten mit bis zu 
512k freiem Speicherplatz mit gleichzeitiger Einbindung 
ins AMSDOS. 

Das Programm DFORM erzeugt einen neuen RSX-Befehl: 
DFORM. Dieser Befehl benötigt einen Parameter, der das 
gewünschte Format angibt. Er darf vier verschiedene Wer¬ 
te annehmen: 

0 — Bei jedem Diskettenzugriff wird vom AMSDOS au¬ 
tomatisch das Format der Diskette festgestellt 

1 — Das DATA Format, jedoch mit 13 Blocks mehr, die 

dann auf den Spuren 40—42 liegen 

2 — Das CPM Format, sonst wie 1 

3 - Das neue EXTENDED Format. 

Das letzte Format unterscheidet sich von den anderen ganz 
erheblich. Dort stehen dem Anwender unter AMSDOS näm¬ 
lich volle 215k zur Verfügung! Bei den Formaten 1 und 2 wer¬ 
den nur die Spuren 40—42 neu in das Betriebssystem einge¬ 
bunden. 

Nun etwas zur Funktionsweise der Programme. Wie inzwi¬ 
schen wohl allgemein bekannt ist, kann das Schneider Lauf¬ 
werk ohne Probleme auch Disketten mit 43 Spuren verarbei¬ 
ten. Um diese aber ins Betriebssystem einzubinden, muß man 
schon einen etwas höheren Aufwand betreiben. Das Betriebs¬ 
system bezieht seine Informationen über das Format der ein¬ 
gelegten Diskette aus einem Bereich im RAM, dem DPB. 
Dieser Begriff kommt aus dem CPM und steht für Disk Pa¬ 
rameter Block. Er liegt beim CPC unter AMSDOS norma¬ 
lerweise für das Drive A an der Adresse # A890. Dort sind 
einige Informationen enthalten, wie z.B. das aktuelle Format, 
die Anzahl der Einträge im Directory etc. Der DPB enthält 
unter anderem auch ein Byte, das bestimmt, ob bei jedem 
Diskettenzugriff das Format der eingelegten Diskette erkannt 
werden soll. Es ist das Byte 24 im DPB. Wird dieses auf # FF 
gesetzt, wird der Auto Login abgeschaltet. Hat es dagegen 
den WertO, so wird der Auto Login angeschaltet. Nur wenn 
man den Auto Login abschaltet, kann man dauerhafte Ver¬ 
änderungen am DPB durchführen. Für die Formate 1 und 2 


ist nur das Byte 5 des DPB von Bedeutung, das die maximale 
Blocknummer der Diskette enthält. Normal ist beim CPM 
Format ein Wert von 170. DFORM tut nun also nichts wei¬ 
ter, als diesen Wert um 13, die Anzahl der Blocks auf den Spu¬ 
ren 40—42, zu erhöhen. Interessanter ist hier das Format 3. 
Wie bekommt man auf einer Diskette 215k freien Platz, wo 
doch selbst mit 43 Spuren nur 193k darauf Platz finden? Hier 
kommt ein weiterer Vorteil des DPB zum Vorschein: Man 
kann dem AMSDOS fast beliebige Formate »beibringen«. 
Beim Format 3 werden lediglich 10 Sektoren statt der übli¬ 
chen 9 formatiert. Dadurch erhält man 0.5k mehr Speicher¬ 
platz pro Spur, wodurch man bei 43 Spuren auf einen Gewinn 
von insgesamt 22k kommt. Um nun 10 Sektoren pro Spur zu 
formatieren, reicht das CPM Dienstprogramm FOR- 
MAT.COM nicht mehr aus. Das besorgt dafür das beigefügte 
Programm FORMAT. Es ist größtenteils in BASIC geschrie¬ 
ben, nur die Routine zum Formatieren eines Tracks ist in As¬ 
sembler geschrieben, da man Routinen im Floppy-ROM lei¬ 
der von BASIC aus nicht aufrufen kann. Das Programm läuft 
nur, wenn vorher der RSX-Befehl DFORM installiert wor¬ 
den ist. Das Programm selber kann nicht nur dieses erwei¬ 
terte Format formatieren, sondern auch das normale DATA- 
und CPM-Format, jedoch mit 43 statt der sonst üblichen 40 
Tracks. Im CPM Format wird allerdings das CP/M nicht auf 
die Diskette übertragen, dies muß nachträglich mit SYS- 
GEN.COM oder BOOTGEN.COM auf die Diskette kopiert 
werden. 


Wichtig!!! 

Diese Routinen laufen alle nur auf Laufwerk A, da die er¬ 
weiterten Formate mehr Platz im RAM verbrauchen und so¬ 
mit einen Teil des DPB von Drive B überschreiben. Wenn 
Drive A und B gleichzeitig eingesetzt werden, so darf das 
nur im Modus 0, d.h bei eingeschaltetem Auto Login, ge¬ 
schehen, da es sonst zu Fehlern beim Schreiben eines Files 
auf Drive B kommen kann. Wenn man jedoch vorher den 
Befehl DFORM,0 gibt, d.h. auf die normalen Formate um¬ 
stellt, kann so etwas nicht Vorkommen. 

(T. Müller-Gerber) 



für 464 


100 '**************************** CI 1643 

110 'DFORM - C3663 

120 ’RSX zum uaehlen mehrere C22333 

130 'Diskformate C9153 

140 'DFORM,formet C6673 

150 'formet = C6013 

160 ' 0 - Normal (LOGIN) C6023 

170 * 1 - DATA, 43 Tracks C7113 

180 ’ 2 - CPM, 43 Tracks C8453 

190 ’ 3 - 213K free C2583 

200 ***************************** CI 1643 

210 MEMORY 8.A3FF C4423 

220 FOR i=&A400 TO &A470 C8033 

230 READ u4:w=VAL( "8.“+u*) :s=s+u:P0KE i,u C 19823 
240 NEXT C3503 


250 READ h*:IF w*OHEX*(s, 4)THEN PRINT'dat C24073 
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a error":END 

260 CALL &A400 •Install DFORM C19723 

270 POKE 8.BE66.4 ’4 Leseversuche C12653 

200 END Ci 103 

290 DATA 21,01,A4,01, IE,A4,CD,Dl,BC,21 C18893 

300 DATA 17,A4,CD,D4.BC,22,71.A4,79,32 C15043 

310 DATA 73,A4,C9,83,44,46,4F,52,CD,00 C14413 

320 DATA 18,A4,3D,CO,FD,2A,42,BE,DD,7E C14363 

330 DATA 00,FE,03,28,21,B7,20,05,FD,36 C17123 

340 DATA 18,00,C9,3D,3E,40,28,02,3E,CO C18913 

350 DATA IE,00,DF,71,A4,3E,OD,FD,86,05 C16763 

360 DATA FD,77,05,FD,36,18,FF,C9,FD,E5 C10893 

370 DATA Dl,21,5B,A4,01,16,00,ED,BO,18 C17433 

380 DATA EE,28,00,03,07,00,D6,00,3F,00 C14763 

390 DATA CO,00,10,00,00,00,21,OA,OE,IC C14033 
400 DATA E5,02,04 £5563 

410 DATA 2B06 C4463 


100 ********************************* C12853 

110 • C1173 

120 'ForaatierprogranB, V2.0 C23433 

130 ’foraatiert Disketten alt bis zu C38343 

140 *10 Sektoren, 43 Tracks, 215k C16803 

150 ’ C1173 

160 ********************************* C12853 

170 a=HIMEM CI 1343 

180 GOSUB 460 C9683 

190 ********** Foraatabfrage C18243 

200 MODE 1 :PRINT"****** FORMAT ******":LOC C34343 
ATE 1,8 

210 PRINT-D - DATA FORMAT" sPRINT C17043 

220 PRINT"C - CPM FORMAT":PRINT C21203 

230 PRINT'E - EXTENDED FORMAT"sPRINT:PRINT C31813 
240 PRINT'X - EXIT":PRINT:PRINT C16693 


250 PRINT"? "CHRS>( 143)CHR*(8) ; C 16923 

260 i*=UPPER*(INKEY*)sIF i$=""THEN 260 C16543 

270 fs=8,FF:IF i$="D"THEN fs=8.Cl:f=l C 11893 

280 IF i*="C"THEN fs=Mlsf=2 C 18133 

290 IF i*="E"THEN fs=8.21:f=3 C 16873 

300 IF i$="X"THEN 430 C 12543 

310 IF fs=&FF THEN 260 C7103 

320 PRINT i*SPRINT C6093 

330 tf=8.A200s ! DFORM, f C20283 

340 PRINT"Wirklich FORMATIEREN ? "CHR*(143 C46883 
)CHR*(8); 

350 i*=UPPER$(INKEY*)sIF i*=""THEN 350 C14773 

360 PRINT i*SPRINT C6093 

370 IF i*<>"J"THEN 430 C9643 

380 PRINT"Bitte DISKETTE e in 1 egen " sCALL 8<B C31613 
B06 

390 FOR i=0 TO 9:P0KE tf+2+i*8,fs+isIF i>4 C37623 
THEN POKE tf+6+(i-5)*8,fs + i 
400 NEXTsPRINT C8113 

410 FOR i=0 TO 42sPRINT"Track"i;CHR$(13);s C36053 
CALL &.A300, i,fs,tf sNEXT 

420 GOTO 200 C4293 

430 MEMORY aspRINT C7703 

440 END CI 103 

450 ********* MC einiesen C10853 

460 MEMORY 8. Al FF C4503 

470 FOR i=&A300 TO 8.A333 C6303 

480 READ u*sw=VAL(:s=s+w:POKE i,u C 19823 

490 NEXT C3503 

500 READ w*sIF «*<>HEX*(s,4)THEN PRINT"dat C24073 
a error ":END 

510 RETURN C5553 

520 DATA FE,03,CO,21,3C,00,36,86,CD,D4 C19043 

530 DATA BC,DO,22,3C,00,79,32,3E,00,DD C17963 

540 DATA 66,01,DD,6E,00,DD,4E,02,DD,56 C23563 

550 DATA 04, IE,00, E5, 06,OA,72,23,36,00 C21493 

560 DATA 23,23,36,02,23,10,F5,El,DF,3C C17283 

570 DATA 00,C9 C4983 

560 DATA 128A C1923 


BEKANNTMACHUNG 

Bei unserem 

allseits bekannten und beliebten Telefon-Service, 
dem »Heißen Draht«, 

können Sie Ihre Fragen und Anregungen von 

17.00 - 20.00 Uhr 

an die Redaktion 

von PC Schneider International richten. 

Auf Ihren Anruf freuen sich: 

Michael Ebbrecht (Hardware, Joyce), 
Stefan Ritter (Redaktion), 

Thomas Morgen (Programmierung) 
und Heinrich Stiller (Spiele/Adventures). 

Jeden Mittwoch am 

HE1SSE.H DRAHT 

Tel. (05651)87 02 


C O M A L 

die Sprache für Anfänger und Aufsteiger 

Sie suchen 

- nach einem schnellen Einstieg 
in die Programmierung 

- nach einer strukturierten Sprache 

- nach einem erweiterbaren System 

- nach einem Standard 


Wir bieten 

- die Sprache COMAL 

- einen ständigen Service 

- viele freie Programme 

- Literatur zu COMAL 

- Experten für ihre Fragen 


COMAL 1.83 
COMAL 2.0 
COMAL 2.0 
COMAL 2.0 


Diskette für CPC 
Modul für CPC 
Diskette für Joyce 
Diskette für Schneider-PC 


DM 69,00 
DM 248,00 
DM 148,00 
DM 445,00 
ab 8 Stück ä DM 398,00 


Alle Preise verstehen sich inklusive deutschem Handbuch. 
Bei der Joyce-Version ist zusätzlich ein Runtime-Modul vor¬ 
handen. 



Bauer & Kaup GBR 
Teichstraße 9 
4401 Saerbeck 
Tel.: 02574/8008 
Wir arbeiten eng mil verschiedenen 
bildung zusammen. 


Service durch 
Herrn Siegfried Bauer 
Tel.: 04627/543 
Tägl. 10.00 bis 22.00 Uhr 
Landesinstituten für Lehrerfort- 
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[—Programme 


CPC-Animator 

Seit Beginn meiner »Computer-Laufbahn« hat mich 
nichts so sehr fasziniert wie die Computergrafik. So wur¬ 
den die Veröffentlichungen des »3D-Läufers« (Heft 5) 
und des »Animators« (Heft 10) sehr gegrüßt. Mit dem 
»Animator« wurde auch sehr viel experimentiert, doch 
stand immer wieder die Speichergrenze meines CPC 464 
im Wege, um längere Animationen erzeugen zu kön¬ 
nen. Die einzelnen Bilder des Animators benötigten doch 
erheblichen Speicherplatz. All meine folgenden Über¬ 
legungen standen unter dem Vorsatz, die Speicherplatz¬ 
belegung der Animation zu optimieren. 



Um eine ansprechende Lösung zu er¬ 
halten, mußten einige Kompromisse 
hinsichtlich der Komplexität der Gra¬ 
phik (Flächen, Farben, Linien) und 
der Geschwindigkeit geschlossen wer¬ 
den. Anstatt ganze Bildschirmauszü¬ 
ge im Speicher abzulegen, beschränkte 
ich mich auf die Speicherung von 
Anfangs- und Endpunkt der Objekt¬ 
kanten. Ein Maschinenprogramm ruft 
dann Linie für Linie auf den Schirm. 

Leider lassen sich mit dieser Metho¬ 
de nur Vektorgrafiken »bewegen«, die 
aber auch ihren ganz besonderen Reiz 
haben. 


Filmaufbau 


Der Animations-Film besteht aus wie¬ 
derholbaren Szenen, die wiederum aus 
einzelnen Bildern aufgebaut sind. Ei¬ 
ne 360-Grad Drehung eines Würfels 
ließe sich somit mit vier 90-Grad- 
Drehungen darstellen, wodurch kost¬ 
barer Speicher gespart würde. Die 
Animation läßt sich jederzeit durch ei¬ 
nen beliebigen Tastendruck unterbre¬ 
chen, um im Rahmenprogramm 
fortzufahren. Eine Animation sieht im 
Speicher folgendermaßen aus. 

1. BYTE Wiederholungsrate der 
Szene 

XI, Yl, Linicnanfangspunkt 
X2, Y2, Linienendpunkt 
X3, Y3, nächster Anfangspunkt 
X4, Y4, und dazugehöriger Endpunkt 

&FF Kennzeichen für Bildende 


... weitere Bilder 

&FF, &FF Kennzeichen für Szenen 
ende 

... nächste Szene 

3 mal &FF Kennzeichen für Filmende 

Die MC-Routine arbeitet aus Spei¬ 
cherplatzgründen nur mit Byte- 
Werten, so daß Bildgrößen von ma¬ 
ximal 244x244 Pixels erreichbar 
sind. Vor Animationsbeginn muß dem 
Maschinenprogramm die Filmstart- 
adresse mitgeteilt werden. Nach Auf¬ 
ruf wird die Wiederholungsrate ge¬ 
lesen. Anschließend werden alle Li¬ 
nienzüge bis zum ersten &FF erzeugt. 
Dann wird auf die andere Grafikseite 
umgeschaltet, das Grafikfenster wird 
gelöscht und ein neues Bild gezeich¬ 
net. Bei &FF, &FF wird die Wdh- 
Rate erniedrigt. Wenn Wdh=0 wird 
mit der nächsten Szene begonnen. Bei 
dreimal &FF oder einem Tastendruck 
wird die Animation beendet. 

Nun sind auch der MC-Routine in ih¬ 
rer Geschwindigkeit Grenzen gesetzt. 
Es werden die Grafik-Routinen des 
Betriebssystems über die Sprungvek¬ 
toren genutzt. Somit wird die Anpas¬ 
sung an eigene Routinen erleichtert. 
Da die Zeichen-Routinen nicht die 
schnellsten sind, wie durch den »Profi- 
Painter« und »Vektor« bewiesen wur¬ 
de, sollten einige Punkte für eine 
schnelle Bildfolge beachtet werden. 

1. wenige Linienzüge 

2. kleinere Bildgrößen 

3. möglichst viele horizontale bzw. 
vertikale Linien 


Werden diese Punkte berücksichtigt, 
lassen sich leicht ruckfreie Bewegun¬ 
gen realisieren. 


Filmerstellung 

Um den Film zu erstellen, können be¬ 
liebige Methoden genutzt werden. Ich 
möchte ein Verfahren vorstellen, wel¬ 
ches leicht zu handhaben ist und rea¬ 
listische 3D-Grafiken erstellt. 

Räumliche Transformationen durch 
Matrizenmultiplikation 

Um einen 3D-Körper drehen, ver¬ 
schieben und verklcinern/vergrößern 
(skalieren) zu können, müssen seine 
Eckpunkte in die jeweilige neue Lage 
transformiert werden. 

Jede komplizierte Bewegung bzw. 
Transformation läßt sich aus Elemen¬ 
tartransformationen (Drehung, Ver¬ 
schiebung, Skalierung) und der 
dazugehörigen Matrix darstellen. Mul¬ 
tipliziert man die jeweiligen Matrizen 
in der richtigen Reihenfolge miteinan¬ 
der (!), so erhält man eine Matrix, die 
alle Informationen für die gesamte 
Transformation enthält. Jeder beliebi¬ 
ge Raumpunkt läßt sich nun durch die 
erhaltene Matrix in seine neue Lage 
transformieren. 

Aufbau der Matrix (Zeile, Spalte) 
bei...(Spalte 4 dient der korrekten 
Multiplikation = > keine Bedeutung) 
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Verschiebung: 

X Y Z / 

X 10 0 0 

Y 0 10 0 

Z 0 0 10 

Versch. DX DY DZ 1 


Skalierung: 

SK 0 0 

0 SY 0 

0 0 SZ 

0 0 0 


Drehung um den Winkel Alpha 


X-Achse: 

1 

0 

0 

0 


0 

cos 

sin 

0 


0 

-sin 

cos 

0 


Y-Achse: 


cos 

0 

-sin 

0 


sin 

0 

cos 

0 


Z-Achse: 

cos 

sin 

0 

0 


-sin 

cos 

0 

0 


0 

0 

0 


Wie die neuen Raumpunkte errechnet 
werden, ist dem Filmlisting (Zeile 355 

— 390) zu entnehmen. Die transfor¬ 
mierten Punkte brauchen dann nur 
noch auf dem Bildschirm zentralpro¬ 
jeziert zu werden. Außerdem werden 
bei den nur teilweise sichtbaren Linien 
die Schnittpunkte mit den Grenzen des 
Grafikfensters errechnet (Zeilen 555 

- 820), so daß diese Rechnerei den 
Grafikroutinen erspart bleibt (Ge¬ 
schwindigkeitssteigerung). Die Raum¬ 
punkte und die Kantenliste werden ab 
Zeile 1380 abgelegt. Die noch fehlen¬ 
den Bewegungsvorschriften bzw. das 
Drehbuch für den Film werden in ei¬ 
ner DATA-Zeile abgelegt (Zeile 
1450). so daß alle Elemente und Be¬ 
fehle durch Kommata getrennt werden 
müssen. Jede Szene ist eingeklam¬ 
mert. die Wiederholungsrate steht vor¬ 
weg. Der erste Wert nach der 
Klammer gibt die Bildzahl der Szene 
an. Es bedeuten ... 

Rotationsbefehle: 

RX. Alpha/RY. Alpha/RZ Alpha (um 
den Winkel Alpha) 

Schiebebefehle: 

SX, Dis/SY,Dis/SZ, Dis (um den 
Weg Dis) 

Ein »C« nach einem Befehl (z.B. 
RXC.459 bewirkt eine feste Vorabdre¬ 


hung um die X-Achse von 45 Grad. 
Zur Geschwindigkeitssteigerung der 
fertigen Animation sollten die Werte 
für die Bildschirmgröße in der ORIG- 
Anweisung berücksichtigt werden. 
Mit den Werten und den Drehbuch- 
Anweisungen sollte eifrig experimen¬ 
tiert werden. Beherrscht man alle Be¬ 
fehle, lassen sich erstaunliche 
Bewegungen erzielen. 


Einbau der Animation in eigene 
Programme 

Nach einem »MEMORY &3FF« kann 
der Film und die MC-Routine geladen 
werden. Nun kann jederzeit von einem 
Programm unterhalb von &3FF die 
Animation aufgerufen werden. Der 
genaue Gebrauch kann dem Demo- 
Listing entnommen werden. Als 
Nachschlagewerke empfehle ich jedes 
Mathematik-Lexikon sowie das 
DATA-BECKER-Buch »CPC 464. 
Grafik + Sound«. Beim Abtippen des 
Filmlistings müssen nur die REM- 
Zeilen, die mit einem Fragezeichen 
beginnen, eingegeben werden. Noch 
ein Tip: Das Matrizenverfahren läßt 
sich bei Streichen der Z-Zeile und Z- 
Spalte auf zwei Dimensionen be¬ 
schränken. 


für 464-664-6128 



100 

’***************************** 

[1143] 

110 

’* 


* 

[ 175] 

120 

• * 

Animations-Code 

* 

[331] 

130 

’ * 


* 

[ 175] 

140 

’* von Peter Stein 

* 

[482] 

150 

’* 


* 

[ 175] 

160 

’* 

Dez '86 / Jan ’87 

* 

[677] 

170 

’* 


* 

[ 175] 

180 

’* BASIC-Lader: FILMCODE.BIN * 

[2121] 

190 

’* 


* 

[ 175] 

200 

’***************************** 

[1143] 

210 

MEMORY 8.A5FF 


[467] 

220 

FOR adr=&A600 TO 8.A667:READ a$:P0KE ad [2786] 

r,VAL( "& 

"+a$):NEXT 



230 

SAVE 

"Fi lmcode ", b, &.A600,8.68 

[2470] 

240 

END 



[ 110] 

250 

DATA 

2A,64,A6,7E,FE,FF,C8, 

47 

[ 1783] 

260 

DATA 

23,22,66,A6,C5,2A,66, 

A6 

[1046] 

270 

DATA 

CD, 19,A6,C 1, 10, F6,23, 

18 

[599] 

280 

DATA 

EA,7E,FE,FF,C8,CD,2B, 

A6 

[1128] 

290 

DATA 

23, 18,F6,2A,64,A6,7E, 

FE 

[ 1 180] 

300 

DATA 

FF,28, 11,CD,54,A6,CD, 

CO 

[1509] 

310 

DATA 

BB,2A,64,A6,CD,54,A6, 

CD 

[769] 

320 

DATA 

F6.BB, 18,E7,3A,CB,Bl, 

E5 

[ 1438] 

330 

DATA 

F5,CD,08,BC,F1,D6,80, 

32 

[1252] 

340 

DATA 

CB,Bl,CD,DB,BB,El,CD, 

1B 

[ 1476] 

350 

DATA 

BB,38,OD,C9,5E,23,56, 

23 

[ 1468] 

360 

DATA 

22,64,A6,6A,16,00,62, 

C9 

[1310] 

370 

DATA 

Dl,Dl,Dl,C9,00,80,00, 

00 

[ 1082] 


5 MODE 1:RAD:MEMORY &.A5FF:BORDER 1:INK 0,1 C56913 


: INK 1,24:INK 2,0:INK 3,6:PAPER 0:PEN 1 
10 LOAD " f i 1 racode " : MEMORY &.3FFF [ 1909] 

15 ’********************** [673] 

20 ’* 3D-Fi 1 inerzeugung * [ 1035] 

25 ’* * [175] 

30 ’* von * [269] 

35 '* * [175] 

40 ’* Peter Stein * [540] 

45 ’* * [ 175 ] 

50 ’* Nov/Dez ’86 * [295] 

55 ’* * [175] 

60 ’********************** [673] 

65 ’ [117] 

70 ’=========== [929] 

75 ’ Variablen [503] 

80 ’=========== [929] 

85 DIM x( 100),y( 100),z( 100):’Punkteliste [2197] 
90 DIM k1%(100),k2%(100):'Kantenliste [1324] 


95 DIM b1%(20),b2%(20),b3%(20),p(20):’Beue [3902] 
gungsvorsehriften 

100 DIN a(4,3) 1 b(4,3),c(4,3):’Hilfsmatrize [1804] 
n 

105 DIH v(4,3),t(4,3):’Transformation Welt [4113] 
=>Auge 


110 DIM u(3):'Weltkoordinaten [1541] 

115 DIM e(3):’Augenkoordinaten [999] 

120 DIM ck(100,3):’Schnittkoordinaten [1693] 

125 bx= 126:by=98: ’Bildschirmskalierung [2442] 

130 mx= 128:my=100:’Bi1dschirmmitte [2336] 

135 sx=30/2:sy=24/2:’Phsikalische Bildgroe [1844] 

sse 

140 d=50:'Brennweite [1936] 
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145 

ex=5:ey=0:ez=0:’BeträchterStandpunkt 

C 3318] 

530 

v(i, 1 )=c(i, 1)*f1 

[1168] 

150 

* 


C 117D 

535 

v(i,2)=c(i,2)*f2 

[ 1340] 

155 

MODE 1 :PEN 3:LOCATE 7,1:PRINT' 

C P C - 

[3790] 

540 

v(i,3)=c(i,3)*f3 

[835] 

A n 

i m a t i o n" :PEN 1 



545 

NEXT i 

[375] 

160 

LOCATE 8,3:PRINT"by Peter Stein, Dez ’ 

[4655] 

550 

RETURN 

[555] 

86" 











560 

’? 3D-Schneiden einer Stecke 

[2591] 

165 

LOCATE 10,7:PRINT"C1] -> Film 

erzeugen 

[3808] 

565 

’ (xl,yl,zl)-(x2,y2,z2) 

[ 1205] 





570 

’ in Schnitt-Kooerdinaten 

[883] 

170 

LOCATE 10,9:PRINT"[2] -> Film 

abspiele 

[2898] 

575 


[ 1764] 





580 

c l=-(8*(yl>z1)+4*(yl<-zl)+2*(xl>z1) + (x 

[2807] 

175 

LOCATE 10, 1 1 :PRINT"[31 -> Film 

abspeic 

[3311] 

1<- 

zl) ) 


h e r n 



585 

c2=-(8*(y2>z2)+4*(y2<-z2)+2*(x2>z2)+(x 

[2844] 

180 

a$=INKEY*:a%=VAL(a$):IF a%<1 OR a%>3 T 

[2338] 

2< - 

z2) ) 


HEN 

180 



590 

IF c 1=0 AND c2=0 THEN 795 

[2029] 

185 

MODE 1:ON a% GOTO 1220,1315,1350 

[2107] 

595 

IF (cl AND c2) <> 0 THEN RETURN 

[934] 

195 

’? 4*4-Matrizen-Multiplikation 


[2595] 

605 

IF (c AND 1)=0 THEN 635 

[ 1513] 
[920] 

200 

’ c(4,4)=a(4,4)*b(4,4) 


[ 1188] 

610 

'Schnitt links berechnen 

[2120] 

205 

’ Matrixaufbau : 


[ 1610] 

615 

t=(z 1+xl)/((xl-x2)-(z2-z1)) 

[ 1478] 

210 

• * * * 0 


[58] 

620 

z=t*(z2-z 1 )+z 1 

[ 1018] 

215 

’ * * * 0 


[58] 

625 

x=-z 

[394] 

220 

’ * * * 0 


[58] 

630 

y=t*(y2-yl)+y1:GOTO 725 

[ 1815] 

225 

’ * * * 1 


[57] 

635 

IF (c AND 2)=0 THEN 665 

[ 1429] 

230 



[ 1906] 

640 

'Schnitt rechts berechnen 

[957] 

235 

FOR i=l TO 3:FOR j = l TO 3 


[626] 

645 

t=(zl-xl)/((x2-x1)-(z2-z1)) 

[ 1379] 

240 

c(i,j)=0:F0R k=l TO 3 


[915] 

650 

z=t*(z2-z1)+z1 

[ 1018] 

245 

c( i,j)=c(i,j)+a(i,k)*b(k,j) 


[ 1265] 

655 

x=z 

[597] 

250 

NEXT k:NEXT j : NEXT i 


[ 1247] 

660 

y=t*(y2-yl)+yl:GOTO 725 

[ 1815] 

255 

’ i =4 


[312] 

665 

IF (c AND 4)=0 THEN 695 

[1116] 

260 

FOR j=l TO 3:c(4,j)=b(4,j) 


[ 1206] 

670 

'Schnitt unten berechnen 

[ 1405] 

265 

FOR k= 1 TO 3 


[1083] 

675 

t=(z 1 + y1)/((yl-y2)-(z2-z1)) 

[ 1909] 

270 

c(4,j )=c(4,j )+a(4,k)*b(k,j) 


[ 1592] 

680 

z=t*(z 2 -z1)+z 1 

[1018] 

275 

NEXT k:NEXT j 


[764] 

685 

x=t*(x2-x11+xl 

[1117] 

280 

RETURN 


[555] 

690 

y=-z:GOTO 725 

[922] 

285 



[ 1 163] 

695 

IF (c AND 8)=0 THEN 725 

[ 1585] 

290 

’? a(4,4)=c(4,4) 


[636] 

700 

'Schnitt oben berechnen 

[1079] 

295 

• - 


[ 1163] 

705 

t=(z 1-y1)/((y2-y1)-(z2-z1)) 

[ 1721] 

300 

FOR i=l TO 4:FOR j=l TO 3:a(i, 

j)=c(i,j 

[4784] 

710 

z=t*(z2-z1)+z1 

[1018] 

):NEXT j:NEXT i:RETURN 



715 

x=t*(x2-x1)+xl 

[1117] 

305 

’ - 


[783] 

720 

y=z 

[577] 

310 

’? a ( 4,4 ) = 1 


[486] 

725 

IF cOcl THEN 745 

[1143] 

315 

’- 


[783] 

730 

xl=x:yl=y:zl=z 

[ 1085] 

320 

FOR i=l TO 4:FOR j = l TO 3:a(i, 

j ) =0:NEX 

[2254] 

735 

c1=- ( 8*(y>z)+4*(y<-z)+2*(x>z) + (x<-z ) ) 

[2176] 

T: NEXT 



740 

GOTO 590 

[454] 

325 

a( 1, 1) = 1: a C 2,2) = 1’: a (3,3) = 1: RETURN 

[ 1502] 

745 

x2=x : y2=y : z2=z 

[822] 

330 

1 - 


[783] 

750 

c2=-(8*(y>z)+4*(y<-z)+2*(x>z)+(x<-z) ) 

[2347] 

335 

’? b ( 4,4 ) = 1 


[616] 

755 

GOTO 590 

[454] 

345 

FOR i=l TO 4 : FOR j=l TO 3:b(i, 

j ) =0 : NEX 

[3073] 

765 

’ Stecke (x 1, y 1,z1)-(x2,y2,z2) 

[1192] 

T : NEXT 



770 

’ liegt im sichtbaren Bereich 

[1451] 

350 

b( 1, l) = l:b(2,2) = l:b(3,3) = l:RETURN 

[ 1817] 

775 

’ umrechnen in Bildschirm-Koordin. 

[2570] 

355 



[ 1765] 

780 

’ und anzeigen 

[415] 

360 

’? ck ( n, 1. . 3 )=u( 4 ) *c ( 4,4 ) 


[ 1552] 

785 

’ nach Strahlensatz 

[ 1474] 

365 

’eigentl. Transformation 


[2108] 

790 


[2058] 

370 



[ 1765] 

795 

xl=(xl/zl)*bx+mx:x2= ( x2/z2 ) *bx+mx 

[3107] 

375 

FOR i = l TO 3 : ck=c ( 4,i ): FOR j = l 

TO 3 

[ 1337] 

800 

y 1=(y 1/z 1)*by + my:y2=(y2/z2)*by + my 

[2522] 

380 

ck=ck+w(j)*C(j,i) 


[504] 

805 

POKE ad,x 1:POKE ad+l,yl 

[812] 

385 

NEXT j:ck(n,i)=ck=NEXT i 


[ 1790] 

810 

POKE ad+2,x2:POKE ad+3,y2 

[926] 

390 

RETURN 


[555] 

815 

MOVE x 1,y1:DRAW x2,y2, 1 

[671] 

395 



[ 1776] 

820 

ad=ad+4:RETURN 

[955] 

400 

’? Start-Matrix V ausrechnen 


[432] 

825 

’- 

[1163] 

405 

’ Blick auf P(0,0,0> 


[1211] 

830 

’? Bild erzeugen 

[1709] 

415 

r 1=SQR(ex*ex+ey#ey) 


[1193] 

840 

FOR n=l TO np: u (1)=x(n): u (2)=y(n): u (3) 

[3439] 

420 

r=SQR(ex*ex+ey*ey+ez*ez) 


[864] 

=z(n) :GOSUB 360:NEXT 


425 

s l=ex/r 1 :c l=ey/r 1 


[ 1714] 

845 

’ 

[ 117] 

430 

s2=ez/r:c2=r1/r 


[899] 

850 

CLG 2 

[220] 

435 

’t l*t2 


[99] 

855 

FOR n= 1 TO nk 

[669] 

440 

GOSUB 310:GOSUB 335 


[ 1383] 

860 

i l=k 1 %( n ) : i2=k2%(n) 

[1751] 

445 

’ a=t l*t2 


[455] 

865 

x l=ck ( i 1, 1 ): x2=ck ( i2, 1) 

[ 1782] 

450 

a(4, 1)=-ex:a(4,2)=-ey : a ( 4,3 ) =ez 

[ 1409] 

870 

yl=ck ( i1,2 ): y2=ck ( i2,2 ) 

[ 1283] 

455 

'Drehung um y-Achse 


[ 1104] 

875 

zl=ck(i1,3) : z2=ck ( i2,3) 

[ 1743] 

460 

b(1, 1 ) =c1 : b ( 1,3)=sl 


[828] 

880 

GOSUB 560 

[885] 

465 

b ( 2,2 ) = 1 


[801] 

885 

NEXT n 

[366] 

470 

b ( 3, l)=-sl:b(3,3)=cl 


[963] 

890 

IF ax=ad THEN x 1=0 : x2=0 : y1=0 : y2=0 : GOSU 

[2492] 

475 

GOSUB 195 


[930] 

B 805 


480 

GOSUB 290 


[923] 

895 

POKE ad,255:ad=ad+l:RETURN 

[ 1455] 

485 

GOSUB 335 


[ 1013] 

900 

'- 

[ 1194] 

490 

•Drehung um x-Achse 


[ 1555] 

905 

’? Szene erzeugen 

[945] 

495 

b(1,1)=1 


[631] 

910 

- 

[1194] 

500 

b(2,2)=c2:b(2,3)=-s2 


[623] 

915 

sz%=sz%+l:LOCATE 1,5:PRINT USING "Szen 

[3105] 

505 

b(3,2)=s2:b(3,3)=c2 


[738] 

e ## 

mit ## Bi ld( ern ) " ;szX, nb 


510 

GOSUB 195 


[930] 

920 

LOCATE 40,5=PRINT"Szenenstart : &"HEX$ 

[3877] 

515 

* 


[ 117] 

(ad- 

1) 


520 

fl=d/sx:f2=d/sy:f3=-1 


[877] 

925 

GOSUB 400 

[964] 

525 

FOR i=l TO 4 


[450] 

930 

FOR m=1 TO nb 

[834] 
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935 

GOSUB 995 

[1025] 

940 FOR i=l TO 4: FOR j=l TO 3:b(i,j)=v(i,j 
):NEXT:NEXT 

[3585] 

945 

GOSUB 195 

C 930 ] 

950 

ax=ad 

[476] 

955 
en 11 ; 

LOCATE 9,7:PRINT USING "Bild ## erzeug 
m:GOSUB 830 

[2805] 

960 L0CATE 40,7:PRINT"Restspeieher : &";HE 
X$(&A600-ad);" 

[5081] 

965 

NEXT m 

[371] 

970 

POKE ad,255:ad=ad+1 

[332] 

975 

(ad) 

LOCATE 60,5:PRINT"Szenenende : &";HEX$ 
:GOSUB 1460:LOCATE 74,5:PRINT" 

[5935] 

980 FOR i=l TO 4:FOR j=l TO 3st(i,j)=a(i,j 
):NEXT:NEXT 

[3695] 

985 

RETURN 

[555] 

990 

’- 

[783] 

995 

’? Hatrix A 

[260] 

1000 


[783] 

1005 FOR i=l TO 4:FOR j=l TO 3:a(i,j)=t(i, 
j):NEXT:NEXT 

[3658] 

1010 

1=0:IF bl%(0)=0 THEN RETURN 

[997] 

1015 

GOSUB 335 

[ 1013] 

1020 

pu = p ( 1 ) 

[294] 

1025 

IF b3%(1) = 1 THEN pu=pu*m/nb 

[ 1256] 

1030 

IF b 1%(1) = 1 THEN 1080 

[1732] 

1035 

’ Hatrixaufbau fuer Rotationen 

[2962] 

1040 C=C0S(pu):s=SIN(pu):IF b2%(l)<>l THEN 
1050 

[3973] 

1045 

b ( 2,2 ) =c : b (2,3 ) =-s : b ( 3,2 ) =s : b ( 3,3 ) =c 

[2238] 

1050 

IF b2%(1)02 THEN 1060 

[619] 

1055 

b( 1, l)=c:b( l,3)=s:b(3, 1)=-s:b(3,3)=c 

[2119] 

1060 

IF b2%(1)03 THEN 1085 

[863] 

1065 

b( 1 , 1)=c:b( 1,2)=-s:b(2,1)=s:b(2,2)=c 

[1707] 

1070 

GOTO 1085 

[398] 

1075 

’ Hatrixaufbau fuer Schiebungen 

[3733] 

1080 

b( 4, b2%(1))=pu 

[669] 

1085 

GOSUB 195:GOSUB 290 

[979] 

1090 

1 = 1 + 1 sIF b1%(1)<>0 THEN 1015 

[ 1769] 

1095 

RETURN 

[555] 

1100 

ii 

ii 

ii 

ii 

ii 

ii 

ii 

ii 

n 

ii 

li 

ii 

n 

ii 

ii 

n 

ii 

ii 

ii 

n 

ii 

n 

n 

ii 

[ 1765] 

1105 

’? Drehbuchzeile einiesen 

[ 1042] 

1110 

n 

ii 

ii 

ii 

ii 

ii 

ii 

ii 

ii 

ii 

ii 

n 

n 

ii 

n 

ii 

ii 

ii 

ii 

n 

n 

ii 

n 

ii 

[ 1765] 

11 15 

READ us:IF us=0 OR us=255 THEN RETURN 

[741] 

1120 

READ a$:IF a$< > " ( " THEN 1200 

[ 1005] 

1125 

READ nb:i=0 

[994] 

1130 

1210 

READ a$:a$=UPPER$(a$):IF a$=")" THEN 

[2583] 

1 135 

b$=LEFT$(a$,1) 

[881] 

1140 

IF b$="S " THEN b 1%(i) = 1 

[ 100] 

1145 

IF b$="R" THEN b 1% ( i ) =2 

[715] 

1150 

b$=MID$(a$,2, 1) 

[ 1045] 

1155 

IF b$="X" THEN b2% ( i )= 1 

[728] 

1160 

IF b$="Y" THEN b2%(i ) =2 

[1461] 

1165 

IF b$="Z" THEN b2%(i ) =3 

[ 1173] 

1170 

b3%(i)=1 

[733] 

1175 

IF LEN ( a$ )< >3 THEN 1185 

[ 1516] 

1180 

IF RIGHT$ ( a$, 1 ) = "C " THEN b3%(i)=2 

[ 1418] 

1 185 

READ pu : IF b 1% ( i ) =2 THEN pu=pu*PI/180 

[2078] 

1190 

p ( i ) =pu 

[286] 

1195 

i = i + 1:GOTO 1130 

[421] 

1200 

PRINT"Fehler in Komando-Zei1e " 

[3075] 

1205 

us=0:RETURN 

[972] 

1210 

b 1% ( i)=0:b2%<i)=0:b3%(i ) =0 : RETURN 

[ 1843] 

1215 


[ 1163] 

1220 

’? Film erzeugen 

[ 1010] 

1225 

'=============== 


1230 

MODE 2:PLOT 7,0:DRAW 7,198:DRAW 270,1 

[5587] 

1235 

ORIGIN 8,0,8,262,2,196 

[1000] 

1240 

szX=0 

[214] 

1245 ad=&8000:LOCATE 1,3 : PR I NT " F i 1istart : 
&■" ;HEX$(ad) 

[3973] 

1250 

RESTORE 

[621 ] 

1255 
z (n ) 

READ np : FOR n=l TO np : READ x(n),y(n), 
NEXT n 

[2724] 

1260 READ nk : FOR n=l TO nk : READ kl%(n),k2% 
(n) : NEXT n 

[3302] 

1265 FOR i=l TO 4 : FOR j=l TO 3 : t ( i , j) =0 : NE 
XT : NEXT 

[2508] 

1270 

t(1,l)=l:t(2,2)=l:t(3,3)=l 

[ 1885] 

1275 

GOSUB 1105 

[858] 

1280 

IF us=0 THEN 1295 

[2050] 

1285 

POKE ad,us:ad=ad+l 

[859] 

1290 

GOSUB 905:GOTO 1275 

[ 1598] 

1295 

POKE ad,255 : ad=ad+1 

[332] 


Lauter 

Anwendungsprogramme 


PROFIREM 

Das Geschäftssoftwarepaket 
Fakturierung, Adressendatei, Lagerdatei 
neue erweiterte Version! 

• universelle Einsatzmöglichkeiten 

• Einlesen von Adressen in die Faktura 

• Einlesen von Lagerartikeln in die Rechnung, 
mit automatischer Bestandskorrektur 

• Speicherung von Rechnungen 

• Einfaches nachträgliches Ändern 

• komfortable Eingabemasken 

• Ausdruck sortierter Adressenlisten 

• Berechnung des Lagerwertes 

• für Joyce 178, - DM, für CPC 136, - DM 


ETATGRAF 

Das Haushaltsbuch mit Grafik 

Verwalten Sie Ihre Ausgaben mit dem Computer. Die grafi¬ 
schen Auswertungsmöglichkeiten verschaffen Ihnen jederzeit 
einen guten Gesamtüberblick 

• bis zu 18 verschiedene Kostenarten 

• Bearbeitung von 12 Monaten 

• Tabellen, Balkengrafik 

• für Joyce oder CPC nur 58, - DM 


FIBUKING v2.0 

Die preiswerte Finanzbuchführung 

• 60 Konten, einfache oder doppelte Buchführung 

• bis zu 4-stellige Kontennummern 

• automatische Bilanzierung 

• für Joyce oder CPC nur 136, - DM 


VOKABI 

Der universelle Vokabeltrainer 

• für Joyce oder CPC nur 58, - DM 

DATENREM 

Die einfache Dateiverwaltung 

• für Joyce oder CPC nur 68, - DM 

KALKUREM 

Tabellenkalkulation mit Grafik 

• 3“ Diskette für CPC nur 78, - DM 

COM-FORM 

Druckprogramm für Überweisungsformulare 

• 3“ Diskette für CPC nur 48, - DM 




Programm-Entwicklung und Vertrieb 
Elfriede van der Zalm 

Schieferstätte, 2949 Wangerland 3 
Telefon (04461) 5524 

Versand erfolgt per Vorkasse (portofrei), Nachnahme (zzgl. 5,- DM) 
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^Programme 


1300 LOCATE 40,3: PRINT"Fi 1 mende : 8,";HEX$( 

[3371] 

260 xx=32*3:yy=398-(5*16)+8:bx=2 sby=2:grx= 

[3721] 

ad) 

1305 IF INKEY*="" THEN 1305 ELSE 155 

C 1597] 

4:gry=4:s=- 1.5:f3=2 

270 uort$="CPC Animation" 

[ 1836] 

1310 ’- 

[1194] 

280 GOSUB 790 

[927] 

1315 ’? Film abspielen 

[906] 

290 xx=32*3-4:yy=398-(5*16)+6:bx=2:by=2:gr 

[3876] 

1320 — = ————— = —— == ——— 

[1194] 

x=4:gry=4:s=-1.5:f3=3 


1325 ORIGIN 0,0,0,254,0, 194:P0KE &B1CB,8,40 

[2331] 

300 GOSUB 790 

[927] 

: CLS:CLG 2 


310 LOCATE 3,2:PRINT"by" 

[990] 

1330 IF PEEK(&.8000)=0 THEN PRINT CHR$(7):G 

[3532] 

320 uort$="Peter Stein" 

[ 1529] 

OTO 155 


330 xx=16*24:yy=398-(14*16):bx=1:by=1:grx= 

[6899] 

1335 POKE &A664,0 : POKE &.A665, &.80 : CALL 8.A60 

[ 1687] 

2 : gry=2:s=-1:f3=3:GOSUB 790 


0 


340 LOCATE 2,6:PRINT"Nov/Dez ’86" 

[ 1456] 

1340 GOSUB 1460 : POKE 8,B 1CB, &C0 : GOTO 155 

[2383] 

350 uort$="DEMO" 

[1173] 

1345 ’================ 

[1194] 

360 xx= 17*24:yy=398-(18* 16)-8:bx=2:by=1:gr 

[5406] 

1350 ’? Film speichern 

[ 1778] 

X=4:gry=2:s=0:f3=3:GOSUB 790 


1355 ’- 

[1194] 

370 SYMBOL AFTER 256: MEMORY 8.3FFF 

[ 1779] 

1360 HODE 1: PRI NT 11 Fi 1 m speichern" 

[2984] 

380 1 

[117] 

1365 INPUT "Filmname : ",n$ 

[ 1016] 

390 ’MC-Routine fuer Bildueberblendung 

[2558] 

1370 laenge=ad-&>8000: SAVE n$, b, 6,8000, laeng 

[2731] 

400 ’ 

[117] 

e 


410 FOR i=8,A000 TO 8.A000+ 1 1: READ a$:a = VAL( 

[3297] 

1375 GOTO 155 

[410] 

"8, "+a$ ) : POKE i , a : NEXT 


1380 ’============================== 

[ 1959] 

420 CALL 8.A000 

[637] 

1385 ’ Koordinaten der Raumpunkte 

[3123] 

430 ’ 

[117] 

1390 DATA 16 

[87] 

440 1 Film , Film-Routine laden 

[ 1306] 

1395 DATA 2,0,2, 1,0,2,0,0,2, - 1,0,2,-2,0,2 

[ 1345] 

450 ’ 

[117] 

1400 DATA 2,0,-2,1,0,-2,0,0,-2,-1,0,-2,-2, 

[ 1935] 

460 LOAD "!FILMCODE" 

[818] 

0,-2 


470 LOAD "!ANIMAT":'erzeugte Animation 

[3060] 

1405 DATA 2,0,1,2,0,0,2,0,-1 

[ 1197] 

480 ORIGIN 4*16,4*16,4*16,18.5*16,4*16,13. 

[1793] 

1410 DATA -2,0,1,-2,0,0,-2,0,-1 

[ 1380] 

9*16:CLG 1 


1415 ’============================== 

[ 1959] 

490 ’ 

[ 117] 

1420 ’ Liste der Kanten 

[ 1816] 

500 ’ Demo-Schleife 

[2200] 

1425 DATA 10 

[93] 

510 ' 

[117] 

1430 DATA 1,6,2,7,3,8,4,9,5,10 

[1164] 

520 ’ Pointer fuer Film : 8<a664 

[ 1366] 

1435 DATA 1,5,11,14,12,15,13,16,6,10 

[ 1429] 

530 ’ 

[117] 

1440 ’============================== 

[ 1959] 

540 INK 0,1:1NK 2,2:INK 3,6 

[ 1282] 

1445 * Drehbuch 

[992] 

550 POKE 8.A664,0 : POKE 8.A665,8,80 : CALL 8.A600 

[ 1687] 

1450 DATA 1, (, 1,sy,-l, ), 1,(, 10,sx,5, ),0 

[ 1403] 

560 INK 0,3:1NK 2,6:INK 3,11 

[822] 

1455 ’ Pause 

[515] 

570 POKE 8,A664,0 : POKE 8.A665,8,80 : CALL 8.A600 

[ 1687] 

1460 FOR p=0 TO 2000:NEXT:RETURN 

[ 1499] 

580 GOTO 540 

[425] 

10 ’*********************************** 

[ 1460] 

590 END 

600 ' 

610 1 Rahmendarstellung 

620 ’ x,y=Position dx,dy=Ausdehnung 

630 ’ f 1,f2=Rahmenfarben 

640 * 

650 PRINT CHR$(23)+CHR*(1):TAG:PLOT 0,-2,f 

1 

660 MOVE x,y:PRINT CHR$(221); 

670 FOR i=l TO dx-2:PRINT CHR$(207);:NEXT: 
PRINT CHR$(220); 

680 MOVER -16,0:PRINT CHR*(222); 

690 FOR i=l TO dy-2:MOVER -16,-16:PRINT CH 
R$(207);:NEXT:MOVER - 16,- 16:PRINT CHR$(221 
) ; 

700 PLOT 0,-2,f2 

710 MOVE x,y:PRINT CHR$(223); 

[ 110] 
[117] 

[ 1717] 
[2857] 

[ 1682] 

[ 117] 

[2303] 

[2247] 

[2404] 

[ 1300] 
[6515] 

[707] 

[2271] 

20 ’* * 

[ 175] 

720 FOR i=l TO dy-2:MOVER -16,-16:PRINT CH 

[6519] 

30’* CPC-Animation * 

[ 1646] 

R$(207);:NEXT:MOVER -16,-16:PRINT CHR*(220 


40 ’* * 

[ 175] 

) ; 


50 ’* DEMO von * 

[450] 

730 MOVER -16,0:PRINT CHR$(222); 

[ 1300] 

60 ’* * 

[ 175] 

740 FOR i=l TO dx-2:PRINT CHR$(207);:NEXT: 

[2392] 

70 ’* Peter Stein , Dez ’86 * 

[ 1557] 

PRINT CHR$(223); 


80 ’* * 

[ 175] 

750 TAGOFF:PRINT CHR$(23)+CHR$(0):RETURN 

[4062] 

90 ’*********************************** 

[ 1460] 

760 ’ 

[ 117] 

100 • 

[ 1 17] 

770 ' Multiscript 

[ 1684] 

110 ’ Initialisierung 

[ 1300] 

780 ’ 

[ 117] 

120 ’ 

[117] 

790 FOR a=1 TO LEN(uort$) 

[ 1006] 

130 MODE 1:INK 0,0:INK 1,0:INK 2,0:INK 3,0 

[5484] 

800 uz=ASC(MID$(uort$,a, 1))sIF uz=32 THEN 

[2174] 

:BORDER 0:CLG 0:PEN 2:PAPER 0 

140 SYMBOL AFTER 32 

[1296] 

870 

810 FOR b= 1 TO 8:byte(b)=PEEK(42239-1284+( 

[3199] 

150 POKE 8.B 1CB, 8.C0 

[325] 

uz-32)*8+b):NEXT 


160 • 

[ 117] 

820 FOR c=7 TO 0 STEP -1 

[992] 

170 ’ Bildschirm-Aufbau 

[ 1994] 

830 FOR d=1 TO 8 

[ 1206] 

180 ’ 

[ 117] 

840 IF byte(d)<2 A c THEN 860 ELSE byte(d)=b 

[2730] 

190 f1=2:f2=1:x=0:y=398:dx=40:dy=25:GOSUB 

[3039] 

yte(d)-2~c 


650 


850 FOR y1=0 TO by STEP 2:PLOT xx+a*8*grx- 

[6123] 

200 fl=l:f2=2:x=3*16:y=398-(3*16):dx=34:dy 

[3154] 

c*grx+d*s,yy-d*gry+y1,f3:DRAWR bx,0:NEXT 


=5:GOSUB 650 


860 NEXT d,c 

[370] 

210 X=3* 16:y=398-( 10*16):dx=17:dy= 12:GOSUB 

[2238] 

870 NEXT a 

[383] 

650 


880 RETURN 

[555] 

220 x=22* 16:y=398-( 10*16):dx=15:dy=12:GOSU 

[3235] 

890 ' 

[ 1 17] 

B 650 


900 ’ DATAS fuer MC-Routine 

[1571] 

230 PAPER 1 

[819] 

910 ' 

[117] 

240 WINDOW 5,36,5,7:CLS 

[ 1315] 

920 DATA 2 1,00,cO, 11,00,40,01,00,40,ed,b0, 

[ 1446] 

250 WINDOW 24,36, 12,21:CLS 

[ 1196] 

c9 
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BEWAHREN 



Sie brauchen unsere Hilfe! 
Postfach 476, 7000 Stuttgart 1 


für die Welt Postgiro Köln 500 500-500 




I—Tips & Tricks 


BASICTOOL 

Folgende kleine BASIC-Erweiterung installiert auf dem CPC 
464 drei recht nützliche neue Befehle. Diese Befehle werden 
ohne RSX-Zeichen eingegeben und funktionieren daher auch 
nur auf dem 464. Die Befehle sind im einzelnen: 


COPYLINES a,b TO c 

Dieser Direktmode-Befehl ermöglicht es, zusammenhängen¬ 
de Zeilenblöcke an eine andere Stelle in einem Programm zu 
kopieren. Dieser wird oft dann benötigt, wenn bei einem Pro¬ 
gramm, welches erweitert werden soll, festgestellt wird, daß 
ein bestimmter Programmteil doch mehrmals gebraucht wird 
und dieser als Unterprogramm beispielsweise ans Programm¬ 
ende kopiert werden soll. Der Befehl COPYLINES ermög¬ 
licht das Kopieren in beliebigen Richtungen, wobei aber dar¬ 
auf geachtet werden muß, daß vorhandene Zeilen nicht über¬ 
schrieben werden. Die zu kopierenden Zeilen werden am 
Zielort in Einer-Schritten durchnumeriert und deshalb sollten 
nicht mehr als neun Zeilen auf einmal verschoben werden, 
wenn die Zielzeilennummer zwischen zwei bestehenden, in 
Zehner-Schritten numerierten Zeilen liegt, da sonst eine oder 
eventuell mehrere bestehende Zeilen überschrieben werden. 
Sollen innerhalb eines Programms größere Zeilenblöcke ver¬ 
schoben werden, so empfiehlt sich ein vorheriges Durchnu- 


für 4M 



1 ’ Basiclader fuer die Erweiterung des In [51201 
terpreters um folgende Befehle: 

2 ’ 1. COPYLINES A,B TO C [15011 

3 ’ 2. EDI TL INES A,B [5971 

4 ’ 3. XCOPY [4121 

5 • [1171 

6 * Anfangsadresse: &A200 Laenge: 625 Byt [26931 
es 

7 * [1171 

10 MODE 2: ze= 1000:adr =t<A200: MEMORY adr-1 [42851 


20 s=0:FOR 1=0 TO 15:READ by*:by=VAL("&"+b [34061 
y* ) : s = s + by:POKE adr + 1,by:NEXT 1 

30 READ summ: IF summOs THEN PRINT"Fehler [44651 
ln Ze1le:";ze:STOP 

40 adr=adr+16:ze=ze+10:IF adr<&A475 GOTO 2 [15641 
0 

50 CALL &A200:PRINT"Erweiterung Installier [45881 
t ! " : END 

1000 DATA 3E,C3,32,16,AC,21,IE,A2.22,17.AC [29501 
,32,19,AC,21,41, 1300 

1010 DATA A2.22,1A,AC,32,07,AC,21,62,A2,22 [24721 
,08,AC.C9,11,75, 1465 

1020 DATA A2,CD,27,E3,DO,7E,CD,7B,FF,D8,F1 [22461 
,F1,1A,D1,C1,F5, 2921 

1030 DATA 07,3E,EO,38,02,3E,FF,CD,25,DF,F1 [33741 
,CD,25,DF,C3,86, 2168 

1040 DATA DF,79,07,30,11,3E,EO,B9,CO,D1,C1 [25521 
, DD, El,El,7E,23, 2313 

1050 DATA E5,DD,E5,C5,D5,4F,21,75,A2,CD,13 [36241 
,E3,DO,7E,23,C1, 2493 

1060 DATA CI,C9,FE,CO,CO,23,7E,87,DO,CI,4F [14631 
,06,00,EB,21,90, 2226 

1070 DATA A2,09,C3,BB,DD,43,4F,50,59,4C,49 [24841 
,4E,45,D3,80,45, 1793 

1080 DATA 44,49,54,4C,49,4E,45,D3,81,58,43 [27271 
,4F,50,D9,82,00, 1522 

1090 DATA 96,A2,24,A3,6B,A3,CD,91,CE,D5,AF [26351 
,32,1F,A3,E5,CD, 2403 

1100 DATA 9A,E7,22,20,A3,El,CD,37,DD,2C,CD [33111 
,91,CE,ED,53,22, 2274 

1110 DATA A3,B7,CD,37,DD,EC,CD,91,CE,CI,E5 [31891 
,2A,22,A3,B7,ED, 2700 

1120 DATA 52,38,OB,62,6B,ED,42,38,05,IE,05 [24481 


merieren in genügend großen Abständen. Ans Programmen¬ 
de können beliebig viele Zeilen kopiert werden. Die Zielzei¬ 
lennummer c darf nicht im Bereich von a bis b liegen, da die 
Routine sonst mit einem Improper Argument abbricht. 

EDITLINES a,b 

Dieser Befehl ist ebenfalls im Direktmodus zu verwenden und 
ermöglicht es, Blöcke von Programmen oder gar ganze Pro¬ 
gramme zu editieren, ohne daß vorher jedesmal EDIT Zei¬ 
lennummer und Return eingegeben werden muß. Dieser neue 
Editbefehl kann wie gewohnt mit ESC abgebrochen werden. 
Er endet jedoch auch von selbst, wenn die Zeilennummer b 
erreicht ist. 

XCOPY 

XCOPY ist ein Befehl ohne Argumente, funktioniert auch in¬ 
nerhalb eines Programms und bringt eine Hardcopy des Bild¬ 
schirms um 90 Grad verdreht und vergrößert auf den NLQ 
401. 

Zum Eintippen: 

Der BASIC-Lader wird ganz normal abgeschrieben und ab¬ 
gespeichert. Nach dem Starten mit RUN wird der Maschi¬ 
nencode ab Adresse &A200 abgelegt, von wo aus er mit ei¬ 
nem CALL &A200 initialisiert werden kann und dort bis zum 
Ausschalten des Rechners verbleibt. (J. Dietl) 


,C3,94,CA,60,69, 1499 


1130 DATA AF,ED,52,38,04, 

,A3,7E,B7,CA,64, 1707 

1140 DATA CO,D6,04,4F,23, 
,23,E5,2A,22,A3, 1560 

1150 DATA B7,ED,52,El,Dl, 
,11,40,00,ED,BO, 2374 
1160 DATA 21,40,00,Dl,CI, 
,El,13,09,3A,1F, 2091 
1170 DATA A3,B7,28,C8,09, 
,El,C3,64,CO,00, 1664 
1180 DATA 00,00,00,00,CD, 
,D5,CD,91,CE,CD, 2055 
1190 DATA 4A,DD,ED,53,F8, 
,CI,E7,38,05,IE, 2217 
1200 DATA 08,C3,94,CA,E5, 
,30,1B,CD,BC,E6, 2483 
1210 DATA El,E5,4E,23,46, 
,B8,ED,52,38,08, 1744 
1220 DATA El,09,7E,B7,28, 
,CD,4A,DD,E5,CD, 2250 
1230 DATA IE,A4,11,00,00, 
,A4,CD,96,A3,F5, 1588 
1240 DATA CD,44,A4,CD,38, 
,8A,57,10,E8,3E, 1926 
1250 DATA 03,CD,96,A3,El 
,00,CD,06,A4,E5, 1791 
1260 DATA 21,00,00,22,C4 
,23,E5,2A,C4,A3, 1917 
1270 DATA 23,23,22,C4,A3 
,52,Dl,El,20,E7, 1992 
1280 DATA 10,DA,CI,C9,00 
,00,F5,E5,D5,C5, 2236 
1290 DATA CD,FO,BB,CI,Dl 
,11,13,10,EE,F1, 2272 
1300 DATA FE,07,28,OB,B7 
,CB,11,CB,11,F5, 1840 
1310 DATA 79,CD,FD,A3,79 
,El,C9,CD,2E,BD, 2993 
1320 DATA 38,FB,CD,2B,BD 
,7E,FE,FF,28,06, 2322 
1330 DATA CD,FD,A3,23,18 
,64,00,FF,3E,1B, 2138 
1340 DATA CD,FD,A3,3E,41 


3D,32,1F,A3,2A,20 [2696] 

46.23, D5,5E,23,56 [2055] 

38.24, E5,D5,C5,D5 [3032] 
C5,CD,D8,E6,C1,D1 [2448] 
23,23,23,23,18,CI [2656] 
91,CE,CD,37,DD,2C [4224] 
B8,Dl,31,00,CO,CD [2654] 
CD,63,El,CD,43,CA [2863] 
23,5E,23,56,2A,F8 [3482] 
02,18,DC,C3,64,C0 [2816] 

,06,5B,3E,07,CD,4F [3021] 

,A4,F1,83,5F,3E,00 [2439] 

,C9,C5,06,04,21,00 [3100] 

,A3,El,CD,C6,A3,23 [2560] 
,D5,11,64,00,B7,ED [2438] 
,00,E5,D5,C5,47,OE [1865] 
,El,B7,28,01,37,CB [1863] 
,CB,11,CB,11,CB,11 [2108] 
,CD,FD,A3,Fl,CI,Dl [2359] 
,C9,F5,E5,21,19,A4 [2516] 
,F5,E1,F1,C9,1B,4B [3306] 
,CD,FD,A3,3E,07,CD [2164] 
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Leicht hat er es sich nicht gemacht, 
und viele dachten: „Was der vor hat, 
das geht gar nicht." Thomas Vervost, 
Autor des Prof i Painter CPC, hatte sich 
ausgerechnet die stärksten Grafik¬ 
programme als Konkurrenz und Maß¬ 
stab ausgesucht. Sein ehrgeiziges Ziel: 

Er wollte ein Programm schreiben, 
das eigentlich unmöglich ist - den 
Profi Painter CPC. Einfach zu bedienen 
sollte es sein, schnell sollte es sein, 
flexibel sollte es sein. Kurz, seinen 
großen Vorbildern aus der 32Bit-Welt 
möglichst wenig nachstehen. Nur 
eben auf einem 8Bit-Rechner. Und das 
Ergebnis? „Die Geschwindigkeit und 
die vielen Möglichkeiten, die dem 
Anwender das Arbeiten erleichtern, 
machen den Umgang mit Profi Painter 
CPC zu einem wirklichen Vergnügen." 
Das schrieb CPC International im Test. 
Der .Aktuelle Softwaremarkt' schloß 
mit dem Fazit: „Der Firma DATA 
BECKER sowie dem Autor des Pro¬ 
grammes ist nur zu gratulieren." Den 
einen fasziniert die Einfachheit der 
Bedienung über Symbole wie Bleistift, 
Farbeimer, Lineal oder Sprühdose, 
den anderen die Leistungsfähigkeit, 
die das Programm bietet: 

• Pinsel mit verschiedenen Strich¬ 
stärken 

• Sprühdosenfunktion für Farben und 

Muster ,. 

• Ausschneiden und Verschieben 
beliebiger Bildausschnitte 

• Invertieren, Rotieren, horizontales 
und vertikales Drehen von Objekten 

• optionale imaginäre Rasterunter¬ 
legung 

• problemloses Zeichnen von Geraden 
Rechtecken, Kreisen, Ovalen usw. 



PROFI PAINTER CPC 


DM 99,- 


Das große Crafikbuch zum CPC. 
Zusammen mit Jürgen Steigers, Co- 
Autor von CPC Intern, lüftet der Prof i- 
Painter-Autor hier alle Geheimnisse zur 
Grafikprogrammierung auf dem CPC. 
Dabei wurde nicht vergessen, daß für 
viele dieses Buch der erste Kontakt zur 
faszinierenden Welt der Computer¬ 
grafik ist. Und am Ende des ausführ¬ 
lichen Einsteiger-Teils steckt man 
bereits mitten drin - anhand kleinerer 
Malprogramme in BASIC werden hier 
die wichtigsten Grundlagen vermittelt. 
Basis, um in die Tiefen der Grafikpro¬ 
grammierung vorzustoßen: Charac- 
ters, Diagrammgenerator, Arcade 
Game, Funktionsplotter, Vektor-Grafi¬ 
ken, 3-D-Animation... Selbst auf die 
Peripheriegeräte gehen die Autoren 
detailliert ein. Sie erklären nicht nur, 
wie ein Lightpen funktioniert, sondern 


DATA BECKER 

Merowingerstr. 30 • 4000 Düsseldorf Tel. (0211) 310010 


anhand von Schaltplänen und exakter 
Bauanleitung auch gleich, wie man so 
etwas selber bauen kann. Der große 
Maschinensprache-Teil schließlich ist 
ein Leckerbissen für alle Grafik-Freaks. 
Hier wird die Einzigartigkeit dieses 
Buches am deutlichsten: Dokumenta¬ 
tion aller wichtigen Vektoren, zeilen¬ 
weise dokumentiertes ROM-Listing 
aller grafikbezogenen Teile, Beschrei¬ 
bung aller wichtigen Register, Scrolling, 
Sprites, Organisation mehrerer Bild¬ 
schirmseiten - und als krönender 
Abschluß: GSX mit dokumentiertem 
GDOS. Das große Crafikbuch zum CPC 
zeigt, wie die grafische System-Erwei¬ 
terung arbeitet und wie man sie opti¬ 
mal nutzt. Lassen Sie sich von den 
Autoren zeigen, wie Sie unglaubliche 
Grafiken auf Ihrem CPC zaubern 
können. Mit dem wohl umfassendsten 
Buch zu diesem Thema: 

Das große crafikbuch zum CPC 
Hardcover. 589 Seiten, DM 49,- 














































I Tips & Tricks 


,FD,A3,3E,1B,CD, 2353 

1350 DATA FD,A3,3E,32,CD,FD,A3,C9,E5,3E,42 [2719] 
,CD,IE,BB,El,C8, 2554 

1360 DATA El,El,El,C9,3E,0A,CD,FD,A3,3E,OD [2903] 
,CD,FD,A3,C9,F5, 2711 

1370 DATA C5,D5,3E,1B,CD,FD,A3,3E,4B,CD,FD [1594] 
,A3,3E,14,CD,FD, 2418 

1380 DATA A3, AF,CD,FD,A3,06,14,AF,CD,FD,A3 [2576] 
,10,FA,Dl,CI,Fl, 2690 

1390 DATA 09,00,00,00,00,00,00,00,00,00,00 [2941] 
, 00 , 00 , 00 , 00 , 00 , 201 


BASIC mit Komfort 


für 464-664-6128 

l 



Wer seinen Computer selbst programmiert, der will dies na¬ 
türlich möglichst komfortabel tun. Aus diesem Grund schrei¬ 
ben manche Programmierer ihre Programme mit einer Text¬ 
verarbeitung, speichern sie als ASCII-Codes, laden sie wie¬ 
der unter BASIC und testen sie. Wer diese umständliche und 
zeitraubende Prozedur umgehen, aber trotzdem nicht auf 
Komfort verzichten will, der solle sich doch den eingebau¬ 
ten Editor genauer ansehen. Dieser ist nämlich gar nicht so 
unkomfortabel, wie er auf den ersten Blick aussehen mag. 
Wenn Sie die folgenden Tips & Tricks ausnutzen, stellt der 
Editor sogar manche Textverarbeitung in den Schatten. Diese 
Tips & Tricks lassen sich übrigens auch bei der INPUT- 
Eingabe anwenden! 

Daß man mit den Cursor-Tasten in Verbindung mit den 
SHIFT-Tasten komfortabel kopieren kann, dürfte hinreichend 
bekannt sein. Was aber kaum jemand weiß: zusammen mit 
der Control-Taste kann man mit ihnen »große Sprünge« ma¬ 
chen! Probieren Sie dies am besten in einer Programmzei¬ 
le, die sich über mehrere Bildschirmzeilen erstreckt: 

CTRL+Oben: 

setze Cursor an den Anfang der Programmzeile 
CTRL-I-Unten: 

setze Cursor an das Ende der Programmzeile 
CTRL+Links: 

setze Cursor an den Anfang der Bildschirmzeile, bleibe aber 
innerhalb der Programmzeile 
CTRL-(-rechts: 

setze Cursor an das Ende der Bildschirmzeile, bleibe aber 
innerhalb der Programmzeile 

Mit Control +TAB wechseln Sie vom Einfügen in den 
Überschreiben-Modus und zurück. Wenn Sie eine Passage 
in der Zeile grundlegend ändern wollen, ist dies eine Zeiter¬ 
sparnis, da Sie auf das normalerweise fällige DELETen ver¬ 
zichten können. 

Mit Control + CAPS LOCK wechseln Sie in den SHIFT 
LOCK-Modus und zurück. Damit erreichen Sie auch die 
Sonderzeichen über der Zahlenreihe ohne Drücken der Shift- 
Taste. 

Da der Punkt im Zehner-Block nur selten gebraucht wird, 
ein Komma an seiner Stelle aber viel nützlicher wäre, defi¬ 
nieren Sie ihn doch einfach um: KEY 138,“,“ eingeben, und 
schon ist dies erledigt. 


Die folgende Tasten-Definition bewirkt, daß Sie mit der TAB- 
Taste Ihren Cursor schnell um 9 Stellen nach rechts bewegen 
können (statt x die gewünschte Zahl einsetzen! z.B. :5): KEY 
DEF 68,1,159,159:KEY 159,STRING$(x,243)’ 

Komfort bei der Programmierung beschränkt sich aber nicht 
nur auf die Eingabe. Also folgen nun ein paar Programmier- 
Tricks: 

Warte auf Tastendruck: 

WHILE INKEY$= “ “ :WEND 
Lösche Tastaturpuffer: 

WHILE INKEY$< > “ “ :WEND 
Bildschirm nach oben scrollen: 

LOCATE 1,26:PRINT 

Bildschirm nach unten scrollen: 

LOCATE 1,1: PRINT CHR$(11) 

System reset (Neustart): 

CALLO 

Bei vielen Programmen benötigt man eine Joystickabfrage, 
die auch vertikale Bewegungen erlaubt. Folgende Routine löst 
dieses Problem platzsparend: (x,y=Position) 

10 j=JOY(0):IF j=0 THEN 10 
20 IF j > =16 THEN end: TEUER 

30 IF j > =8 THEN j=j-8:x=x+l:’RECHTS 
40 IF j> =4 THEN j=j—4:x=x—L’LINKS 
50 IF j > =2 THEN j=j—2:y=y—L’UNTEN 
60 IF j > =1 THEN y=y+l: 'OBEN 

70 LOCATE 1,1:PRINT x;y:GOTO 10 
Wenn zu einer Zahl unter bestimmten Bedingungen verschie¬ 
dene Werte addiert bzw. von ihr subtrahiert werden soll, so 
kommen die meisten Programmierer um eine Wenn—Dann 
(IF-THEN) Schlange nicht herum. Nehmen wir z.B. an, daß 
der Score (sc) in einem Spiel um 5 erhöht werden soll, wenn 
mehr als 10 Treffer (tr) gelandet wurden, und es für mehr als 
100 Treffer zusätzlich 5 Punkte gibt. Falls überhaupt nicht 
getroffen wurde, soll dies 5 Punkte kosten. Dies sieht dann 
meist so aus: 

1000 IF tr > 10 THEN sc=sc+5 
1010 IF tr> 100 THEN sc=sc+5 
1020 IF tr=0 THEN sc=sc-5 

Kürzer und eleganter geht es mit der bedingten Addition (bzw. 
Subtraktion). Das geht folgendermaßen: 1000 sc=sc+(5 
AND tr> 10)+(5 AND tr> 100)-(5 AND tr=0) 

Um bei komplizierten and-or-xor-Verknüpfungen die Prio¬ 
rität festzulegen, können Sie auch hier Klammern verwen¬ 
den. Beispiel: 

IF (a=l OR a=5) AND (b=l OR b=5)... 

Um in REMark-Zeilen den senkrechten Balken über dem 
Klammeraffen (RSX-Indikator!) verwenden zu können, müs¬ 
sen Sie diese Zeile in Anführungszeichen setzen. Bei DATA- 
Zeilen jeweils nur die einzelnen Daten in Anführungszeichen 
setzen! In Programmen mit vielen Arrays, in denen auch 
sonst viele Klammern Vorkommen, behalten Sie die Über¬ 
sicht leichter, wenn Sie für die Arrays eckige Klammem ver¬ 
wenden. 

Wann immer möglich, sollten Sie Zahlen-Arrays als Integer- 
Arrays definieren (z.B. feld%(x)), da diese Arrays weniger 
als die Hälfte des Speicherplatzes benötigen! (A. Leitner) 


150 PC 4’87 








Programme—| 


Mensch ärgere dich nicht 

Diese Version des bekannten Brettspiels ist mit Abstand die 
schönste Umsetzung eines Spiele-Klassikers, die uns in der 
letzten Zeit auf den Tisch gekommen ist. 

Die Ausführung in Bezug auf Grafik und Geschwindigkeit 
steht professionellen Spielprogrammen in nichts nach. Die 
Verwendung von MC-Routinen macht das Programm oben¬ 
drein noch sehr schnell und garantiert ungetrübte Spielfreude. 

Hinweise zum Abtippen: 

Als erstes tippen Sie Listing 1 ab und speichern es unter dem 
Namen »MADN.BAS« auf Kassette/Diskette. Fügen Sie in 
dieses Programm keine REM’s ein, sonst wird es länger als 
ein Block. Sind Sie Besitzer eines CPC 664/6128, lassen Sie 
bitte die Zeilen 20 — 320 weg und ersetzen Sie in den Zei¬ 
len 410 und 490 die »CALL &200,«-Befehle durch »FILL«- 
Befehle. 

Als nächstes tippen Sie Listing 3 ab und speichern es unter 
dem Namen »MADN-HP.BAS« hinter Listing 1 auf Kasset¬ 
te/Diskette. Achtung! Noch nicht starten. Sind Sie Besitzer 
eines CPC 664/6128, ersetzen Sie bitte in den Zeilen 1400 und 
1520 die Poke-Adressen »&B1CB« durch »&B7C6«. Außer¬ 
dem müssen Sie in den Zeilen 1610 — 1620 die »Call&A200«- 
Befehle durch »FILL«-Befehle ersetzen. 

Bei Listing 2 muß je nach CPC Typ verfahren werden: 

1. für CPC 464: 

Tippen Sie Listing 2 ab und speichern es auf einer anderen 
Kassette. Danach setzen Sie den Computer zurück und ho¬ 
len Listing 1 »MADN.BAS« in den Speicher. Starten Sie das 
Programm und warten Sie, bis der Computer das Kassetten¬ 
laufwerk einschaltet. Jetzt drücken Sie »ESC« und geben 
»NEW« ein, nicht komplett zurücksetzen. Nun laden Sie Li¬ 
sting 2 wieder in den Speicher und starten es mit »RUN«. Es 
dauert jetzt etwa vier Minuten, bis der »MADNCODE.BIN« 
generiert ist. Dieser wird dann hinter Listing 3 abgespeichert. 
Spulen Sie nun die Kassette zurück und starten mit 
RU N “ M ADN. BAS “. 

2. Für CPC 664/6128: 

Tippen Sie Listing 2 ab und ersetzen Sie in den Zeilen 110 und 
360 die »CALL &A200«-Befehle durch »FILL«-Befehle. Le¬ 
gen Sie nun die Diskette mit den anderen beiden Program¬ 
men ein und starten mit »RUN«. Es dauert jetzt etwa vier Mi¬ 
nuten. bis der »MADNCODE.BIN« generiert und abgespei¬ 
chert ist. Danach können Sie das Programm mit 
RUN “MADN.BAS“ starten. 

Beschreibung des Startprogrammes 

MADN.BAS 

Das Startprogramm enthält als wichtigsten Teil die Fillrou- 
tine für den CPC 464. Diese Fillroutine habe ich aus dem 
Heft 4/86 von Schneider International entnommen. Nach 
dem Start des Programmes werden die DATA's für die Fill¬ 
routine in den Speicher gepoked, ein Titelbild gezeichnet und 
das Hauptprogramm < MADN-HP.BAS> gestartet. 

Beschreibung des Mcodegenerators 

< MADNCODE.BAS> 

Dieses Programm hat die Aufgabe, die Maschinenroutinen 
für die Bildschirmbearbeitung und einen komprimierten 
Screen mit dem leeren Spielbrett zu erzeugen und in binä- 
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n) Michael Naujoks 
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CPC 

Kassette/Diskette 

lOth Frame 

34,90 

/ 49,90 

500 cc Grand Prix 


44,90 

Antiriad 

28,90 

/ 39,90 

Elevator Action 

31,90 

/ 44,90 

Future Knight 

27,90 

/ 40,90 

Impossaball 

28,90 

/ 45,90 

Into the Eagles Nest 

27,90 

/ 44,90 

Koronis Ritt 


/ 49,90 

MGT 

34,90 

/ 44,90 

Short Cicuit 

29,90 

/ 49,90 

The lone Cobra 

29,90 

/ 44,90 

West Bank 

19,90 

/ 31,90 


Joyce 

Diskette 

3D Clock Chess 

49,- 

Brian Clough's Football 

49,90 

Frank Bruno’s Boxing 

69,90 

Jewels of Darkness 

79,90 

Steve Davis Snooker 

49,90 

Tomahawk 

69,- 

Trivial Pursuit (Deutsch) 

59,90 

Bat Man 

49,- 

Joyce Hardware 


256 K Erweiterung 

Joystick Interface* 

109,- 

(programmierbar) 

69,- 


r 


v. 


Hardware 



Software 




y 


dk’tronics Speech-Synthesizer 

(Cassette 464/664) DM 89,— 

(ROM 464/664) DM 129- 

(ROM 6128) *DM 139,— 

dk'tronics Light-Pen (Farbmon.) 

(Cassette 464/664) DM 59,- 

(ROM 464/664) DM 89,— 

(ROM 6128) *DM 89,— 


dk'tronics Speichererweiterungen 

64K für 464/664 

DM 109,— 

256K für 464/664 

DM 249,— 

256K für 6128 

*DM 249,- 

dk'tronics Silicon-Disc 

64K für 6128 

*DM 98,— 

256K für 464/664 

DM 249,- 

256K für 6128 

*DM 249,- 


Adapter für Geräte mit *: DM 29,— 


Alle Geräte haben einen durchgelührten Systembus und können hintereinander auf den Erweiterungsport gesteckt 
werden. Für die mit' gekennzeichneten Geräte benötigen Sie deshalb auch nur einen Adapter zur Umsetzung von 
Schneider- auf Amstrad-AnschluB. Auf alle Geräte 6 Monate Vollgarantie. Händlerantragen erwünscht. 

Kostenlosen Katalog B4/87 anfordern! 



Entwicklung & Vertrieb von 

Hotline: 

> 


Rottmannstr. 40, 6900 Heidelberg 

(06221)46885 

J 



Universeller EPROM-Programmer 4003 
für Schneider CPC 464 / 664 / 6128 


■ Programmiert alle gängigen EPR0M- und EEPROM-Typen 
( z.B.: 2716, 27C16, 2732, 2732A, 27C32, 2758, 2764, 
2764A, 27C64, 27128, 27128A, 27C128, 27256, 27C256, 
2508, 2532, 2564, X2804A, X2816A, X2864A... ) ■ Voll 
menügesteuerte Software auf Kassette oder Diskette 
■ 32 KByte frei für EPROM-Daten ( Brennen des 27256 
ohne Nachladen ) ■ Kein Umschalten Stacken oder Löten 
nötig ■ Programmierspannung wird im Gerät erzeugt ■ Ver¬ 
bindung zum CPC über Flachbandkabel und Interface-Karte mit 
durchgeführtem Eipansionsport ■ Rote und grüne Leuchtdiode zur 
Betriebs-Art-Anzeige ■ Komplott mit 28 poligem Teatool-Sockel ■ 

■ Fartiggerät für CPC 464/664 DM 289,50 ■ Bausatz für CPC 464/664 DM 239,- ■ 

■ Fartiggerät für CPC 6128 DM 319,50 ■ Bausalz für CPC 6128 DM 269,- ■ 

■ Aufpreis für Software auf 3" Diskette : DM 15,- / auf 5.25" Diskette : DM 5,- ■ 

EPROM-Karte 2-64 kb*. für alle CPC 

■ Wahlweise bestückbar mit 2-64 KByte EPROM-Kapazi- 
tät ■ Arbeitet mit den EPROM-Typen 2716,-32,-64,-128 

■ Durchgeführter Erweiterungsbus ( Floppy kompatibel ) 

■ Autostart von BASIC- und/oder Assembler-Program¬ 
men ■ Komplett mit umfangreicher und komfortabler 
Software auf Kassette oder Diskette ■ Gleichermaßen 
für Profis und Einslaiger geeignet ■ 

■ Fertiggerät für 464/664 DM 229,50 ■ Fertiggerät für 
6128 DM 249,50 ■ Bausatz mit Anleitung für 464/664 
DM 199,50 ■ Bausatz mit Anleitung für 6128 DM 219,50 

■ Aufpreis für Software auf 3" Diskette : DM 15,- / auf 5.25" Diskette : DM 5,- ■ 

■ Fartiggerät ohne Software für CPC 464/664 : DM 99,- / für CPC 6128 : DM 119,- ■ 

preisgünstige Matrix-Drucker 

SPEEDY 100-80 100 Zeichen pro Sekunde ■ FX80 kompatibel ■ Near Leiter Quality ■ 

■ Bis zu 142 Zeichen pro Zeile ■ Friktionswalze und Traktorantrieb ■ nur DM 739,- 

SPEEDY 130-80 130 Zeichen pro Sekunde ■ Bis zu 132 Zeichen pro Zeile • 9*9 Matrii 

■ IBM kompatibel ■ Ideal für PC 1512 ■ dautsches und englischas Handbuch ■ nur DM 839,- 

Citizen LSP-120D 120 Zeichen pro Sekunde ■ IBM und EPSON kompatibel ■ 9*9 Matrii 

■ 4K Puffer serienmäßig ■ Schriften : Pica, Elite, invers, proportional, kursiv, komprimiart, 
doppelt breit, doppelt hoch ... ■ Near Letter Quality ■ 2 Jahre Garantie ■ nur DM 525,- 

Druckerkabel dobbertiti 

für CPC 464/664 DM 35,- IflDU/TRIE-ELEKTROniK 

für CPC 6128 DM 39,- 

für PC 1512 _ DM 39,- _ Brahmsstraße 9, 6835 Brühl, Tal,: (06202) 71417 
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rer Form abzuspeichem. Das Programm benötigt die Fillrou- 
tine aus dem Startprogramm. In den Zeilen 10 bis 50 werden 
die beiden Blocktransfer-Routinen erzeugt. Zeile 60 sollte 
wegen der verwendeten Window-Technik auf jeden Fall ein¬ 
gegeben werden. In den Zeilen 102 — 130 wird das leere 
Spielbrett gezeichnet. Der Maschinenaufruf in Zeile 100 
transferiert das fertige Leerbrett in den Speicherbereich von 
4000h — 7FFFh. Die Zeilen 140 bis 230 erzeugen nun im 
Speicherbereich von 8020h - 9EFFh das komprimierte Bild. 
Dazu werden nur die Bytefolgen abgespeichert, in denen sich 
ein Wert >0 befindet. Dieser Programmteil benötigt über 
vier Minuten bis er abgearbeitet ist. Passen Sie auf, daß Sie 
in diesem Bereich keine Fehler machen (Absturzgefahr!!!). 
Die Zeilen 320 und 330 erzeugen die MC-Routine 9F00h. 
Danach wird die ganze Sache unter dem Namen MADNCO- 
DE.BIN abgespeichert und ist ca. 8KB lang. 

(K. Wolf) 


10 MODE 1: INK 0,1:INK 1,1*INK 2,1:INK 3,1* 
BOEDER 1 

20 MEMORY 8<A 1FF: FOR adr=&.A200 TO 8.A2E1:REA 
D a* 

30 u=VAL( "&,"+a$) : POKE adr,u:NEXT 
40 DATA df,04,a2,c9,07,a2,fe,7b 
50 DATA cd,f6, 17,f5,cd,fc, 15,cd 
60 DATA 27, 18,cd,86,Oc,c1,b8,c8 
70 DATA 32,df,a2,cd,la,16,cd,ff 
80 DATA 16,d2,95,a2,e5,fd,el,d5 
90 DATA dd,e 1,cd,a9,Ob,3a,df,a2 
100 DATA 47,fd,23,cd,2d,Oc,3a,34 
110 DATA b3, fd, 95, 38,05,78,ae,a1 
120 DATA 28,ef,fd,2b,cd,13,0c,51 
130 DATA 59,e5,c5,cb,01,de,05,Oc 
140 DATA 78,42,ae,a 1,57,20,Oa,bO 
150 DATA 28,07,dd,2b,df,a5,a2,dd 
160 DATA 23,c1,e 1,e5,c5,cb,09,de 
170 DATA f9,Ob,78,43,ae,a1,5f,20 
180 DATA Oa,bO,28,07,dd,23,df,a5 
190 DATA a2,dd,2b,c1,e 1,3a,38,b3 
200 DATA ae,a1,ae,77,3a,36,b3,fd 
210 DATA 95,30,0a,fd,2b,cd,13,0c 
220 DATA 78,ae,a1,28,b4,2a,eO,a2 
230 DATA 7d,b4,c8,2b,22,e0,a2,df 
240 DATA cd,a2,c3, Ie,a2,a8,a2,fd 
250 DATA d5,2a,89,ae,01,03,00,cd 
260 DATA 18,f6,38,17,eb,22,89,ae 
270 DATA dd,e5,d1,fd,e5,c1,2b,72 
280 DATA 2b,73,2b,71,2a,eO,a2,23 
290 DATA 22,e0,a2,dl,c9,d0,a2,fd 
300 DATA 2a,89,ae,2b,56,2b,5e,2b 
310 DATA 22,89,ae,6e,26,00,c9,00 
320 DATA 00,00 

330 WINDOW 2,39,2,24:PAPER# 1, 1:PEN#1,3:CLS 

#1:PAPER 0:PEN 1:CLS:WIND0W 3,38,3,23 

340 DEG:ORIGIN 500,80:M0VE 80,0 

350 FOR i=90 TO 270 STEP 10 

360 DRAW 80*SIN(i),40*C0S(i),1 

370 NEXT 

380 DRAWR 40,150:M0VE 80,0:DRAWR -40,150:M 
OVE -40,150 

390 FOR i=225 TO 495 STEP 10:j = i MOD 360 
400 DRAW 55*SIN(j),190+55*C0S(j) 

410 NEXT i : MOVE -78,0:CALL 8.A200.2 
420 ORIGIN 100, 120:MOVE 0,80 
430 FOR i=0 TO 360 STEP 10 
440 DRAW 30*SIN(i),80*C0S(i),1 
450 NEXT 

460 DRAWR 150,-40:M0VE 0,-80:DRAWR 150,40: 
MOVE 150,40 

470 FOR i=315 TO 585 STEP 10:j=i MOD 360 
480 DRAW 190+55*SIN(j),55*C0S(j) 

490 NEXT i : MOVE -28,0:CALL 8.A200,3: MOVE 22 

0,0 : CALL &A200,3 

500 ORIGIN 0,0:PLOT 0,0,1 

510 MOVE 28,370:TAG:PRINT" Mensch aerge 

re dich nicht !";:TAGOFF 

520 MOVE 92,354:DRAW 522,354,1 

530 PEN 2=PRINT CHR$(22)+CHR$(1);" Mens 

ch aergere dich nicht !" 

540 MOVE 96,350:DRAW 526,350,3 

550 PLOT 0,0,1:MOVE 28,306:TAG:PRINT" Cre 

ated by : " ;:TAGOFF 

560 LOCATE 1,5:PRINT * Created by *■ 

570 MOVE 28,274:TAG:PRINT" Korbinian 

Wolf";:TAGOFF 

580 LOCATE 1,7:PRINT " Korbinian Wolf 


590 MOVE 28,242:TAG:PRINT" 

CHR*(164);" 12/1986"TAGOFF 
600 LOCATE 1,9:PRINT " “;CHR$ 

(164);" 12/1986"; CHR$(22)+CHR$(0):PEN 1 
610 INK 0, 13:1NK 1,0:INK 2,7:INK 3,2 = B0RDE 
R 9 

620 LOCATE#1, 1,25:PRINT# 1," Bitte warten, 
Programm wird geladen !" 

630 RUN " IMADN-HP.BAS" 




C3866] 

C2693] 

C1319] 
C605D 
C2366] 
C 1312] 
C 1001] 
C 1586] 
[ 1770] 
C1245] 
C 1772] 
C 1057] 
C 1913] 
C 1000] 
C1253] 
CI 187] 
C 1459] 
C 1957] 
[896] 

C1523] 
C 1178] 
C1304] 
C 1792] 
C1736] 
C 1769] 
[720] 

[ 1370] 
[1333] 
[ 1475] 
C829] 

[ 1510] 

[440] 

[3800] 


[1542] 
[2014] 
[1640] 
C350] 
[2199] 


[2251] 
C 1414] 
C74 1 ] 

[ 1067] 
[820] 
[1281] 
[350] 

[ 1902] 

[ 2212 ] 
[ 1487] 
[2627] 

[533] 

[2604] 

[1346] 
[4988] 

[ 1466] 
[3849] 

[ 1947] 
C2285] 

[2439] 

[3104] 

[3571] 

[ 2000 ] 

C4016] 

[903] 
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Programme—i 


C 1460] 
[ 175] 

[ 1795] 
C 175] 

C 655 ] 

C 175] 

C1842] 
C 175] 

C 1460] 
[ 117] 

[1206] 
[8376] 


[4223] 

[4788] 

[5226] 


10 ’*********************************** 

20 ’* * 

30 ’* Mensch aergere dich nicht * 

40 ’ * * 

50 ’* Created by Korbinian Wolf * 

60 ’ * * 

70 ’* (C) Korbinian Wolf 12/86 * 

80 ’ * * 

90 ’*********************************** 

100 ’ 

110 **** Instruktionen *** 

120 MODE 2:INK 0,13:INK 1,0:BORDER 12:PAPE 

R#2, 1:PEN#2,0:WINDOW#1,3,78,4,24:PAPER# 1,0 
:WINDOW 5,76,5,23:PAPER 0:PEN 1:CLS#2:CLS# 
l:CLS 

130 L0CATE#2,12,2:PRINT#2,"MENSCH AERGERE 
DICH NICHT (C) Korbinian Wolf 12/1986 

140 PRINT "Spielregeln und Bedienungsan1ei 
tung :":PRINT 

150 PRINT "Erst muss jeder Spieler seinen 
Namen und die geuuenschte Farbe eingeben." 

160 PRINT "Wird kein Name eingegeben u [5512] 
ebernimmt der Computer diese Position." 

I 

170 PRINT "Ist dies geschehen lost der Com [7362] 
puter den -Spieler, der das Spiel beginnt." 

180 PRINT "Gewuerfelt wird mit der <SPACE> [4990] 
-Taste. " 

190 PRINT "Um einen Kegel ins Spiel z [6344] 
u bringen muss man eine <6> uuerfeln." 

200 PRINT "Hat ein Spieler keinen Kege [6888] 

1 im Spiel so darf dieser 3mal uuerfeln." 

210 PRINT "Wuerfelt ein Spieler eine < [13054] 

6> so MUSS er einen neuen Kegel ins Spielb 
ringen. Solange sich noch einer oder me 
hrere Kegel im Haus befinden,"; 

220 PRINT "muss das Startfeld sofort u [9225] 
ieder frei gemacht werden. Nach einer <6>d 
arf noch einmal geuuerfelt werden." 

230 PRINT "Hat ein Spieler nur einen Zug [11759] 

zur Auswahl oder tritt einer der oben ge-n 
annten Pflichtzuege auf, so fuehrt der Co 
mputer diesen Zug automatisch"; 

240 PRINT "aus. Bei mehreren moeglichen Z [12536] 

uegen werden die entsprechenden Kegel vomC 
omputer nummeriert und der Spieler kann di 
e geuuenschte Taste druecken." 

250 LOCATE 17, 19:PRINT "Bitte warten, Prog 
ramm wird geladen !" 

260 GOSUB 2080 

270 LOCATE 17,19:PRINT "Zum Start bitte ei 
ne Taste druecken !" 

280 IF INKEY$="" THEN 280 
290 ’*** Initialisieren *** 

300 DEFINT a-z 

310 KEY 139,"pen 1:paper 0:ink l,0:mode 2" 

+CHR$(13) 

320 DIM feldx(79),feldy(79),feldb(79),rfz( 

71) 

330 MODE 0:BORDER 13:INK 0,13:INK 1,13:INK 
2, 13:INK 3, 13:INK 4,13:INK 5,0:INK 6,26:1 
NK 7, 15:1NK 8, 16:INK 9, 17:INK 10,0,26:INK 
11, 13:INK 12, 13:INK 13, 13:INK 14,13 
340 WIND0W#0,1,20,24,25:PAPER#0,5:PEN#0,15 
:CLS#0 

350 WINDOW# 1,4, 17, 1, 1 :PAPER#1,5:PEN# 1, 15:C 
LS# 1 

360 ORIGIN 0,48,0,636,32,382:CLG 0:CALL 8,8 
00E : CALL 8,9FOO:CALL 8,8000 

370 RESTORE 390:F0R i=0 TO 79:READ feldxli 
),feldy(i):NEXT i 

380 ’*** Data fuer Feldpositionen *** 


[4942] 

[859] 

[6013] 

[808] 

[ 1322] 

[553] 

[3928] 

[1511] 

[8041] 


[2219] 
[3342] 
[4840] 
[4572] 
[ 1985] 
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I—Programme 




390 DATA 428,64,400,78,372,92,344,106,316, [3584] 
120,288, 106,260,92,232^ 78,204,64, 176,78 
400 DATA 148,92,176,106,204,120,232,134,26 [4608] 
0, 148,232, 162,204, 176, 176, 190, 148,204, 176, 

218 

410 DATA 204,232,232,218,260,204,288,190,3 [3952] 
16, 176,344, 190,372,204,400,218,428,232,456 
,218 

420 DATA 484,204,456,190,428,176,400,162,3 [4269] 
72, 148,400, 134,428, 120,456, 106,484,92,456, 

78 

430 DATA 344,22,316,36,288,22,316,8,0,0,42 [2631] 
8,92,400, 106,372, 120,344, 134,0,0 

440 DATA 64,134,92,148,64,162,36,148,0,0,2 [2670] 
04,92,232, 106,260, 120,288, 134,0,0 

450 DATA 288,274,316,260,344,274,316,288,0 [3763] 

,0,204,204,232, 190,260, 176,288, 162,0,0 

460 DATA 568,162,540,148,568,134,596,148,0 [2719] 

,0,428,204,400, 190,372, 176,344, 162,0,0 

470 ’*** Data fuer Reihenfolge bei Kegel z [2517] 

eichnen *** 

480 DATA 63,60,62,61,20,28,19,21,27,29,18, [10187] 

65,22,26,75,30,17,66,23,25,76,31,16,67,24, 
77,32,52, 15,68,78,33,70,53,51, 14,34,71,73, 

50, 13,58,48,35,72, 12,57,4,47,36, 11,56,5,3, 

46,37, 10,55,6,2,45,38,9,7, 1,39,8,0,41,42,4 
0,43 

490 RESTORE 480:F0R i=0 TO 71:READ rfz(i): [2960] 
NEXT i 

500 ’*** Data fuer Wuerfe1position *** [1740] 

510 DATA 568,40,64,40,64,270,568,270 [1091] 

520 RESTORE 510:F0R i=l TO 4:READ ux(i),uy [2955] 

(i):NEXT i 

530 ’*** Kegel auf Grundstellung *** [1556] 

540 FOR i=4 TO 7:FOR j=0 TO 3:feldb(i* 10+j [4341] 

)=i-3:NEXT j,i:GOSUB 1470 

550 ’*** Namen und Farben eingeben *** [1411] 

560 c$=" C P C " [365] 

570 FOR i = l TO 4 '• PRINT "Spieler i ; "Name ? [5207] 

":PRINT:INK i,26,0:INK i+10,0,26:INPUT# 1, " 
",sp*(i):IF sp$(i)="" THEN sp$(i)=c$ 

580 IF LEN(sp$(i))> 14 THEN sp$(i)=LEFT$(sp [2710] 
$( i ) , 14) 


590 IF LEN(sp$(i)X14 THEN sp$(i)=sp$(i) + " [2468] 

600 IF LEN(sp$(i))<14 THEN sp$(i)=" "+sp$( [3024] 
i):GOTO 590 

610 IF sp$(i)=c$ THEN f $ (i)=RIGHT$(STR$(IN [3060] 
T(RND*4) + 1), 1) :IF i = l THEN 690 

620 IF sp$(i)=c$ THEN 650 [1403] 

630 PRINT# 1,sp$(i);:PRINT "Farbe? l=rot 2= [4061] 
gruen 3=blau 4=gelb"; 

640 f$(i)=INKEY$:IF f$(i)<*l" OR f$(i)>"4" [4615] 
THEN 640 ELSE IF i=l THEN 690 
650 FOR j =i-1 TO 1 STEP —1sIF f$(i)=f$(j) [3206] 

THEN k=1 


660 NEXT [350] 

670 IF k= 1 AND sp$(i)Oc$ THEN PRINT#l,"Fa [4210] 
rbe vergeben CHR$(7);:k=0:GOTO 640 
680 IF k=1 THEN k=0:G0T0 610 [802] 

690 IF f$(i)="l" THEN INK i,3:INK i+10,6 [1794] 

700 IF f$(i) ="2" THEN INK i,9:INK i + 10,18 [1003] 

710 IF f$(i) = "3" THEN INK i.UINK i+10,11 [1866] 

720 IF f$(i) ="4" THEN INK i,15:INK i+10,24 [ 1743] 

730 NEXT:CLS#1:CLS [750] 

740 ’*** Beginner auslosen *** [1630] 

750 sp=INT(RND*4)+l [1221] 

760 ’*** Hauptschleife des Spiels *** [1253] 

770 IF sp=5 THEN sp=l [1861] 

780 ’*** Sieger ueberspringen *** [2527] 

790 f lag=0 : FOR i=l TO 4:IF f e 1 db ( sp* 10-K34+ [4599] 
i)=sp THEN flag=flag+1 

800 NEXT:IF flag=4 THEN sp=sp+l:GOTO 760 [1415] 

810 ’*** Anzahl der Wuerfe feststellen *** [2494] 
820 f1ag=0:FOR i=0 TO 8:IF fe1db(sp* 10 + 30+ [3789] 
i)=sp THEN flag=flag+1 

830 NEXT:IF flag=4 THEN u=3 ELSE u=1 [1387] 

840 ’*** Wuerfeln *** [703] 


850 CALL 8,8000:PEN#l,sp+10:PRINT#l,sp$(sp) [3622] 
;:PEN sp+10 

860 IF sp$(sp)< >c$ THEN PRINT" Bitte uue [3605] 
rfeln ";:PRINT" Du darfst";u;CHR$(8);" 
mal " 


870 GOSUB 1590:FOR t=0 TO 1500:NEXT [1459] 

880 u=u-1:IF uz<6 AND flag=4 AND u>0 THEN [2767] 
840 

890 IF flag=4 AND uz<6 THEN sp=sp+l:GOTO 7 [1556] 
60 

900 IF uz<6 THEN 1000 ELSE u=l [1471] 

910 ’*** Kegel ins Spiel bringen *** [1711] 

920 flag=0:FOR i=0 TO 3:IF feldb(sp*10+30+ [4189] 
i)=sp THEN f1ag= 1 

930 NEXT:IF flag=0 THEN 1000 [1013] 

940 geg=fe1db((sp-1)* 10) [609] 

950 IF geg=sp THEN 1000 [792] 

960 IF geg>0 THEN GOSUB 1780 [1813] 

970 i=sp* 10+30 [1183] 


980 IF f e ldb ( i )'=sp THEN f e ldb ( i ) =0 : f e ldb ( ( [3951] 
sp- 1)* 10)=sp ELSE i = i + 1:GOTO 980 

990 GOSUB 1470:SOUND 1,0,5,0:SOUND 1,200,3 [3979] 
,6:SOUND 1,120,2,6:GOTO 760 

1000 ’*** Pflichtzug suchen und ausfuehren [4679] 
*** 

1010 f 1 ag=0•• FOR i =0 TO 3:IF fe 1 db( sp* 10+30 [4189] 
+ i )=sp THEN flag=l 

1020 NEXT:IF flag=0 OR fe1db((sp-1)* 10)<>s [2221] 
P THEN 1080 


1030 geg=fe1db((sp- 1)* 10+uz) [865] 

1040 IF geg=sp THEN 1080 [584] 

1050 IF geg>0 THEN GOSUB 1780 [1813] 

1060 feldb((sp-l)*10)=0:feldb((sp-l)*10+HZ [3984] 
)=sp:GOSUB 1470 

1070 IF u=l THEN 760 ELSE sp=sp+l:GOTO 760 [2445] 
1080 ’*** Zugmoeglichkeiten suchen *** [2432] 

1090 FOR i = l TO 4:moe(i)=- 1:NEXT [1396] 

1100 moz=0:FOR i=39 TO 0 STEP-1 [1410] 

1110 IF feldb(((sp-1)* 10+i)MOD 40)<>sp THE [2387] 
N 1160 

1120 IF i+uz>43 THEN 1160 [1172] 

1130 IF i+uz>39 THEN 1150 [1806] 

1140 IF feldb(((sp-1 )*10+i+uz)MOD 40)<>sp [4213] 


THEN moz = moz+1:moe(moz) = i:GOTO 1160 ELSE 1 
160 

1150 IF feldb((uz+i-39)+(sp*10+34))=0 THEN [5113] 
moz=moz+l:moe(moz)=i 
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...UND 



PLÖTZLICH 
WIRD DER 
SCHNEIDER 
JOYCE 
ZUM ECHTEN 
TEXTSYSTEM. 



Um es ganz offen zu sagen: 

Was fangen Sie mit einem Textverarbeitungs¬ 
system an, das weniger als 10.000 DIN A4 
Seiten Speicherkapazität hat? 

Deshalb unsere Empfehlung: 

Rüsten Sie Ihren Schneider Joyce mit unserem 
Festplattensystem WD 2000 auf, damit Sie 
ihn tatsächlich professionell nutzen können. 

Übrigens: Die vortex-Festplatte WD 2000 mit 
20 MB Speicherkapazität paßt auch zu allen an¬ 
deren Schneider CPC-Computern. 


Der Infoscheck bringt weitere Informationen! 


SMI 3/87 

l-N-F-O-S-OH-E-GK 

Bitte schicken Sie mir umgehend Unterlagen für die 
vortex-Festplatte WD 2000 für den Schneider Joyce. 



COrvlPUTERSYSTEME 


... UND PLÖTZLICH HABEN SIE EINEN PROFI-COMPUTER 


vortex Computersysteme GmbH 

Falterstraße 51-53 ■ 7101 Flein • Telefon (071 31) 52061 










































r~ Programme 


1160 NEXT [350] 

1170 IF moz=0 AND u=0 THEN sp=sp+l:GOTO 76 [1660] 

0 

1180 IF moz=0 AND u=l THEN 760 [1045] 

1190 IF moz= 1 THEN uah1 = 1:GOTO 1270 [2933] 

1200 IF sp$(sp)=c$ THEN GOSUB 1390:G0T0 12 [1855] 
70 

1210 ’*** Zugmoeglichkeiten zur Wahl stell [3103] 
en *** 

1220 GOSUB 1830 [901] 

1230 CLS:PR I NT " Bitte Waehlen ! " [1962] 

1240 IF INKEY$<>" " THEN 1240 [926] 


1250 uah1$=INKEY$:IF uahl*<"l" OR uahl$>"4 [1906] 
" THEN 1250 

1260 uah1=VAL(uah1 $):IF uahl>moz THEN 1250 [3879] 
:ELSE SOUND 1,80,2,6 

1270 ’*** Geuaehlten Zug ausfuehren *** [2275] 

1280 IF moe(uah1)+uz>39 THEN feldb((uz+moe [3940] 
(uah1)-39)+sp*10+34)=sp:GOTO 1320 

1290 geg=f eldb((moe(uah1)+uz+((sp- 1)* 10))M [2308] 
OD 40) 

1300 IF geg>0 THEN GOSUB 1780 [1813] 

1310 feldb((moe(uahl)+uz + ((sp-1)* 10))MOD 4 [3014] 
0) =sp 

1320 f e1db((moe(uah 1)+((sp-1) * 10))MOD 40)= [2368] 


0 

1330 GOSUB 1470:moe(uah1)=0:GOSUB 1910 [3355] 

1340 IF u=0 THEN sp=sp+l:GOTO 760 [1650] 

1350 IF u=1 THEN 760 [554] 

1360 END [110] 

1370 * [117] 

1380 ****** Unterprogramme ***** [2714] 

1390 ’*** Computer-Zug berechnen *** [1849] 


1400 FOR i=l TO 4:uert(i)=0:NEXT i:FOR i=l [1391] 
TO moz 

1410 IF moe(i)+uz>39 THEN uert(i)=3:GOTO 1 [2804] 
440 

1420 IF feldb((moe(i)+uz+((sp-1)* 10))MOD 4 [3145] 
0)00 THEN uert ( i ) =2:GOTO 1440 


1430 uert(i)=l [356] 

1440 NEXT i:huert=MAX(uert(1),uert(2),uert [3581] 
(3),uert(4)) 

1450 i=l [423] 

1460 IF huert=uert(i) THEN uahl=i:RETURN E [4060] 
LSE i=i+1SGOTO 1460 

1470 ’*** Feld besetzen *** [1707] 

1480 CALL &8000: POKE &B1CB,64:CLG 0:CALL 8. [3408] 
9F00:FOR i=0 TO 71 

1490 IF feldb(rfzfi))=0 THEN 1520 [2753] 

1500 f = feldb(rfz(i)) +10: HOVE feldx(rfz(i)) [3824] 
,feldy(rfz(i)) 

1510 GOSUB 1550 [901] 

1520 NEXT i : POKE 8.B 1CB, 192: CALL 8,8000 [2537] 


1530 IF uz+moe(uahl)>39 THEN SOUND 1,284,1 [4044] 
5,6:SOUND 1,2 13, 15,6:SOUND 1, 159, 15,6:FOR 
t=l TO 400:NEXT:RETURN 

1540 SOUND 1,200,3,6:SOUND 1, 120,4,6:RETUR [2860] 

N 

1550 ’*** Kegelchen zeichnen *** [1722] 

1560 MOVER -4,6:PLOTR 0,0,5:DRAWR 8,0:DRAW [5833] 

R 8,4:DRAWR 0,4:PL0TR -4,2:DRAWR 0,4:PL0TR 
—4,2:DRAWR 0,4:PL0TR 4,2:DRAWR 0,4:DRAWR 
-8,4 

1570 DRAWR -8,-4:DRAWR 0,-4:PL0TR 4,-2:DRA [5891] 
WR 0,—4:PLOTR -4,-2:DRAWR 0,-4:PL0TR -4,-2 
:DRAWR 0,-4:DRAWR 8,-4 

1580 MOVER 4,2:DRAWR 0,26,f:M0VER 4,-2:DRA [10837] 

WR 0,-4:MOVER -8,0:DRAWR 0,4:M0VER -4,-18: 

DRAWR 0,-4:MOVER 4,-2:DRAWR 0,12:M0VER 8,0 
:DRAWR 0,-12:M0VER 4,2:DRAWR 0,4:M0VER -8, 

-14: RETURN 

1590 ’*** Wuerfeln *** [703] 

1600 MOVE ux(sp),uy(sp):DRAWR 40,20,5:DRAW [10561] 

R -40,20:DRAWR -40,-20:DRAWR 40,-20:DRAWR 

0,-40:DRAWR 40,20:DRAWR 0,40:M0VER -80,0:D 

RAWR 0,-40:DRAWR 40,-20:M0VER 0,40 

1610 MOVER 0,2:CALL 8.A200, sp+ 10 : MOVER 0,-2 [1587] 

1620 MOVER -4,0: CALL 8.A200, sp+ 10 : MOVER 4,0 [2698] 

1630 MOVER 4,0: CALL 8.A200, sp+ 10 : MOVER -4,0 [2836] 

1640 IF sp$(sp)=c$ THEN FOR t=l TO 100:NEX [2200] 


T:GOTO 1660 

1650 IF INKEY(47)=-1 THEN 1650 [1406] 

1660 uz=INT(RND*6)+l:IF INKEY(47)<>-1 THEN [3744] 
1660 ELSE PRINT CHR$(7); 

1670 IF INKEY$< > " " THEN 1670 [888] 

1680 ON uz GOTO 1690,1700,1710,1720,1730,1 [1714] 
740 

1690 PLOTR 0,20,5:MOVER 0,-20:G0T0 1750 [1372] 

1700 PLOTR 0,10,5:PLOTR 0,20:M0VER 0,-30:G [2611] 
OTO 1760 

1710 PLOTR 0,10,5:PLOTR 0,10:PL0TR 0,10:M0 [2275] 
VER 0,-30:GOTO 1770 

1720 PLOTR 0,10,5:PLOTR 20,10:PL0TR -20,10 [4139] 
:PLOTR -20,-10:MOVER 20,-20:G0T0 1770 
1730 PLOTR 0,10,5:PLOTR 20,10:PL0TR -20,10 [5713] 
:PLOTR -20,- 10:PLOTR 20,0:M0VER 0,-20:G0T0 
1760 

1740 PLOTR -4,10,5:PLOTR 12,6:PL0TR 12,6:P [5437] 
LOTR -16,8:PLOTR -12,-6:PL0TR -12,-6:M0VER 
20,-18:GOTO 1750 

1750 PLOTR 28,4:PLOTR -16,-28:PLOTR -24,0: [5731] 
PLOTR -8, 14:PLOTR -8,14:M0VER 28,-4:RETURN 
1760 PLOTR 28,4:PLOTR -8,-14:PLOTR -8,-14: [3959] 
PLOTR -32, 14:MOVER 20,10:RETURN 

1770 PLOTR 28,4:PLOTR - 16,-28:PLOTR -32,14 [4078] 
:MOVER 20,10:RETURN 

1780 **** Gegner rausuerfen *** [1477] 

1790 i=geg*10+33 [852] 

1800 IF feldb(i)=0 THEN fe1db(i)=geg:geg=0 [3931] 
ELSE i = i— 1:GOTO 1800 

1810 SOUND 2,0, 130,0:S0UND 2,2 13, 10,6:SOUN [4905] 
D 2,253, 10,6:S0UND 2,239, 10,6:SOUND 2,284, 

10,6 

1820 RETURN [555] 

1830 ’*** Kegelchen nummerieren *** [1790] 

1840 FOR i=l TO moz:MOVE feldx((moe(i)+((s [4477] 
p-l)*10))MOD 40),fe1dy((moe(i) + ((sp-1)*10) 

)MOD 40) 

1850 ON i GOSUB 1870,1880,1890,1900 [1648] 

1860 NEXT i:RETURN [719] 

1870 MOVER 0,8:DRAWR 0, 12, 10:PLOTR -4,-2:R [2200] 
ETURN 

1880 MOVER 4,8:DRAWR -8,0:DRAWR 0,6:DRAWR [3427] 
8,0:DRAWR 0,6:DRAWR -8,0:RETURN 

1890 MOVER -4,8:DRAWR 8,0:DRAWR 0,12:DRAWR [4154] 
-8,0:PLOTR 4,-6:RETURN 

1900 MOVER 4,8:DRAWR 0,12:M0VER -8,0:DRAWR [4636] 
0,-6:DRAWR 8,0:RETURN 

1910 **** Ausuertung Sieger und Spielende [2104] 
*** 

1920 f1ag=0:FOR i=l TO 4:IF feldb(sp* 10+34 [4599] 
+ i)=sp THEN f1ag=f1ag+ 1 

1930 NEXT:IF flag<4 THEN RETURN [1556] 

1940 sflag=sflag+1 [294] 

1950 CLS:IF sp$(sp)=c$ THEN PRINT " Ich [4894] 
habe den " ELSE PRINT " Du hast den 

1960 PRINT sflag;CHR$(8);". Platz erreicht [2110] 

1970 IF sf lag= 1 THEN SOUND 1,478,50,7:SOUN [4343] 
D 1,379,50,7:S0UND 1,3 19,50,7:SOUND 1,239, 

50,7:FOR t=l TO 4000:NEXT:GOTO 1990 

1980 SOUND 1,319,50,7:S0UND 1,338,50,7:SOU [4124] 

ND 1,358,50,7:S0UND 1,379,50,7:FOR t=1 TO 

4000:NEXT 


1990 s(sf1ag)=sp [279] 

2000 IF sflag<3 THEN RETURN [823] 

2010 FOR i = l TO 4: IF s(l)Oi AND s(2)Oi A [2734] 
ND s(3)< >i THEN s(4) = i 

2020 NEXT [350] 

2030 FOR i=l TO 4 [450] 

2040 L0CATE#2,3,i*3+5:PAPER#2,5:PEN#2,s(i) [5554] 
+10:PRINT#2,RIGHT$(STR$(i), 1); ". ";sp$(s(i) 

) 

2050 NEXT [350] 

2060 LOCATE#2,3,22:PEN#2,10:PRINT#2,"NOCH [1664] 
EIN SPIEL ?":CLS 

2070 IF INKEY$=""THEN 2070 ELSE RUN [955] 

2080 ’*** Maschinen-Code laden *** [2442] 

2090 IF HIMEM=8<3FFF THEN RETURN [1551] 

2100 MEMORY &7FFF:LOAD"!MADNCODE.BIN":MEMO [2258] 
RY 8.3FFF: RETURN 
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...UND 


PLÖTZLICH 


SPAREN SIE 

BEIM 

SCHNEIDER 

PC 1512 

MIT 


FESTPLAT 


600,- MARK 


5vurtex 

COMPUTERSYSTEME 



Die 20 MB vortex-Drivecard 

... zum Nachrüsten, macht aus Ihrem Schneider PC 1512 
einen Computer, wie ihn Profis brauchen. Denn plötz¬ 
lich haben Sie ein Winchester-Laufwerk mit 20 MB 
Speicherkapazität für nur 1.398,- Mark*. Und 
trotzdem Platz für 2 Floppy-Laufwerke. 
Außer in den Schneider PC 1512 paßt 
vortex-Drivecard in jeden IBM und 
IBM-kompatiblen PC. Sie ist als echte Slot¬ 
karte ruck-zuck eingebaut, Slotdeckel auf, 
Drivecard einstecken, Slotdeckel zu. Paßt! 
...und ist nahtlos in das MSDOS-Betriebs- 
system eingebunden. 

Also: Sofort zum Schneider-Händler oder Info-Scheck 
an VOrteX schicken! ‘empfohlenerVerkaufspreis 

N-F-O -S-C-H-E-C-K 


Bitte senden Sie mir weitere Informationen über Ihren 
„Schneider PC 1512" und einen Händlernachweis. 


...UND PLÖTZLICH HABEN SIE EINEN PROFI-COMPUTER 


vortex Computersysteme GmbH • Falterstraße 51-53 • 7101 Flein 


























Kortex^ 

J ^\V 


Benutzer- 

chnittstelle 


für JOYCE/JOYCE Plus 

KORTEX ist eine Bedienungs-Umgebung, die es Ihnen 
ermöglicht, eigene Menüs zu definieren und miteinander 
zu vernetzen. Sie brauchen nur einzugeben, wie die Me¬ 
nüs heißen sollen. Alles andere erledigt KORTEX selb¬ 
ständig. 


An jedes Menü können Sie einen beliebigen Satz von 
Betriebssystem-Kommandos anhängen, der seinerseits 
automatisch gestartet wird, wenn KORTEX läuft. So wird 
Ihr täglicher Bedienungsbedarf weitgehend vom Betriebs¬ 
system unabhängig, damit durchsichtiger, komfortabler 
und treffsicher. 


KORTEX bietet Ihnen sämtliche Features, die bei einer 
modernen Menüsteuerung nicht fehlen dürfen: Fenster¬ 
technik, Schreibtisch-Effekte, Pull-Down-Menüs, 
Führungstexte, Gestaltungsvariationen der einzelnen 
Menü- und Textanzeigen. Dazu brauchen Sie keine Pro¬ 
grammierkenntnisse, denn alles läuft unter Aufsicht eines 
voll menügesteuerten Spezialeditors ab. 


Fordern Sie kostenlos und unverbindlich weitere Informa¬ 
tionen an. Oder bestellen Sie gleich eine Demo-Version, 
komplett mit deutschem Handbuch, für nur DM 25,-* 
(wird bei späterem Lizenzerwerb voll angerechnet). Oder 
für DM 198,-* eine volle Benutzungslizenz. 


GERALD KEIL 


SOFTWARE-ENTWICKLUNG 
UND VERTRIEB 

Obere Hochstraße 136 - 6652 BEXBACH/Saar 

• inkl. MwSt. Nachnahme (nur Brd) zzgl. DM 3,50. 




ESCHCOMP - SYSTEM 

COMPUTER -VERTRIEB HardSa'rSTÄare 


UNSERE TOP-TEN Programme 


1. Lehrer-Schulverwaltung 

lür CPC 464(664/6128 

398, - DM 

(Version für JOYCE u. MS-DOS in Vorbereitung) 

2. Einnahme-Überschuß-Rechnung 

lür CPC 464/664/6128/Vortex 

288,- DM 

für Joyce / MS-DOS 

398,- DM 

3. Appartement/Hotel-Abrechnung 

für Joyce / MS-DOS 

1298,- DM 

4. Hausverwaltung/Mieter 

lür CPC 464/664(6128 

248,- DM 

5. Super-Lotto RUN 49 


für CPC 464l664!6128!Vortex 

99,- DM 

lür Joyce (MS-DOS 

99, - DM 

6. Lohn/Gehalt Abrechnung 

lut CPC 464/664/6128/MS-DOS 

599, - DM 

7. Star-Writer III v. Star-Division 

für CPC 464(664/6128 

198,- DM 

8. BTX-Software-Decoder 

MS-DOS Version Mono ab 

398, - DM 

9. Pauker-Lernprogramm 


für CPC 464(664/6128 

59, - DM 

10. Mathematik-Trainer 


lür CPC 464(664/6128 

59,- DM 

(Bitte INFO’s anfordern) 


Wordslai 3.0 lür CPC 464 

DM 149,- 

MULTiPLAN für CPC 464 

OM 149,- 

dBase II lur C6128 

DM 149,- 

Microsolt-Basic Joyce/6128 

DM 98,- 

Turbo-Lader Joyce/6128 

DM 98,- 

Business Pack Joyce 

DM 149,- 

Edit Plus - Texlverarb, C6128 

DM 149,- 

Budget-Manager CPC alle 

DM 99 - 

(solange Vortal reicht) 



PÄDAGOGIK- 

Programme 

lür PCIXT/AT/und Kompanie 
zum Einsatz in Schulen und 
EDV Ausbildungszentren 


Einstieg « Oe Well des PCS MS-DOS Kuis 
Einführung m Dateivetwalturg 
Teacftmare fu» PC Emsicige* 499. - OM 

iti! KoDietlretflatlfl 799,- OM 

CHIPSY 

fliatogonentierte BASIC-Schulung nach den Richilm-en der 
KMK 

Teachtwte für PC E insl&Qet 599. - DM 

m<| KotwrlreiMOC 899 - OM 

FIBU-UEBFIX 

iinter'icnisgeeigraes Sclulungscrogiaom nrt Oo.ui.en 
lalion 

lut Finanrtucnnattung 899.- DM 

mil Kooierlreigane ‘899 - DM 


Star Division-Software 


Version Joyce < Joyce Pius 

OM 

289 - 

Slatislik Slat 

OM 

89- 

Mailing System 

DM 

179, — 




Fibu Star 

DM 

289- 


BTX - für Ihren Schneider PC 
letzt lür alle SUPERGUNSTIG mit Ihrem Telelon 
über AkuslikkoDDle' nur BTX Antrag auslüllen 
und Kenn Nr anlord kein Postmodem erlorde' 
lieh _ 


BTXSoflware-Decoder 

Version ohne Graphik (Mono) DM 398. - 

Version mit Graphik OM 798, - 

BTX-KaOel (seriell) DM 49.- 

Dalaphon S21 23d 1200175 Baud DM 398. 
Gesamlpakel Mono DM 799, - 

Gesamlpakel Graphik_DM 1199,- 

TAN00N 20 MB Festplatte DM 1199. - 

ml Controller uoilormaliett 14 Wall Slmmauln 
RAM Erweiterung aut 640 KB DM 69. - 

NEC V CHIP. V 308 MH; DM 49.- 

INTEL-Arilh Co Prozess 8087 DM 599 - 

Hercules Karle milTTL Mon. 12" DM 599- 

Hercules Karle mil TTL Mon 14" DM 799 - 

Super-Preise lür Star-Drucker 
alle Preise aul Anfrage 
NL 10, NG 10. NX 15, NB 15 
SD 10. SD 15. SR 10, SR 15 


ESCHCOMP 

ERNST 

SCHEITHAUER 

Tel. 

SYSTEM 

8391 

PERLESREUT 

(0 85 55) 13 90 


I—Programme 


10 ’#*** MADN-Mcodegenerator **** C1392] 

20 MEMORY 8.3FFF [758] 

30 DATA &F3,& 11, 8.00,8.CO, 8.2 1, 8.00, 8.40, 8.0 1,8.0 [3500] 
0,8,40,8.ED, 8.B0,8.FB, 8.C9 

40 DATA 8.F3,8.2 1,8.00,8.00, 6, 11,8.00,8,40,8.0 1,8.0 [3448] 
0, 8,40,8.ED, 8<BO,8,FB, 8.C9 

50 RESTORE: FOR i=8<8000 TO 8,801B:READ wert: [5120] 
POKE i ,wert:NEXT 

60 KEY 139,"pen 1:paper 0:ink l,0:mode 2"+ [3928] 
CHR$( 13) 

70 MODE 0:BORDER 13:INK 0,13:INK 1,3:INK 2 [8007] 

,9:INK 3, 1: I NK 4,15:INK 5,0:INK 6,26:INK 7 
, 15:INK 8, 16:1NK 9,17:INK 11,6:INK 12,18:1 
NK 13,11:INK 14,24 

80 WINDOW 1,20,24,25:PAPER 5:PEN 15:CLS [2764] 
90 WIND0W#1,4, 17, 1, 1:PAPER# 1,5:CLS# 1 [2637] 

100 ORIGIN 0,48,0,636,32,382:CLG 0 [1540] 

110 MOVE 316,0:DRAW 0,158,5:DRAW 316,316:D [12763] 

RAW 632, 158:DRAW 316,0:DRAW 316,-16:DRAW 6 
32,142:DRAW 632,158:M0VE 316,-16:DRAW 0,14 
2:DRAW 0,158:M0VE 0,-16:DRAW 636,- 16,5:MOV 
E 4, 158 : CALL 8.A200,9 : MOVE 320,0:CALL 8.A200 
, 7 : MOVE 312,0:CALL 8«A200,8 

120 RESTORE 240:FOR i=0 TO 79:READ feldx.f [6464] 
eldy,feldf:IF feldx=0 THEN 130 ELSE MOVE f 
eldx,fe1dy:GOSUB 360 

130 NEXT i : CALL 8.800E [1232] 

140 z=8,8020: FOR i=8<38A0 TO 8.70A0 STEP 8,800 [1906] 
150 FOR j =8.0 TO 8,640 STEP 8.50 [154 1] 

160 a$= "" :FOR k=8<0 TO 8.4F [1065] 

170 adr=8,80ü+i + j+k : IF PEEK(adr)>0 AND LEN( [5748] 
a$)=0 THEN POKE z,adr MOD 256:POKE z+l,INT 
(adr/256):z=z+2 

180 IF PEEK(adr)>0 THEN a$=a$+CHR$(PEEK(ad [2583] 
r) ) 

190 NEXT k [373] 

200 IF LEN(a$)=0 THEN GOTO 230 [1325] 

210 POKE z,LEN(a$):POKE z+l,0:z=z+2 [1007] 

220 FOR k= 1 TO LEN(a$):POKE z,ASC(MID$(a$, [4474] 

k, 1)):z=z+ 1:NEXT k 

230 NEXT j,i [396] 

240 DATA 428,64,1,400,78,6,372,92,6,344,10 [5756] 
6,6,316, 120,6,288, 106,6,260,92,6,232,78,6, 
204,64,6, 176,78,6 

250 DATA 148,92,2,176,106,6,204,120,6,232, [4852] 
134,6,260, 148,6,232, 162,6,204, 176,6; 176, 19 
0,6, 148,204,6, 176,218,6 

260 DATA 204,232,3,232,218,6,260,204,6,288 [5280] 

, 190,6,316, 176,6,344, 190,6,372,204,6,400,2 
18,6,428,232,6,456,218,6 

270 DATA 484,204,4,456,190,6,428,176,6,400 [5056] 

, 162,6,372, 148,6,400, 134,6,428, 120,6,456, 1 
06,6,484,92,6,456,78,6 

280 DATA 344,22,1,316,36,1,288,22,1,316,8, [3690] 

l, 0,0,0,428,92, 1,400, 106, 1,372, 120, 1,344, 1 
34, 1,0,0,0 

290 DATA 64,134,2,92,148,2,64,162,2,36,148 [3590] 
,2,0,0,0,204,92,2,232, 106,2,260, 120,2,288, 
134,2,0,0,0 

300 DATA 288,274,3,316,260,3,344,274,3,316 [3914] 
,288,3,0,0,0,204,204,3,232, 190,3,260, 176,3 
,288, 162,3,0,0,0 

310 DATA 568,162,4,540,148,4,568,134,4,596 [5052] 
, 148,4,0,0,0,428,204,4,400, 190,4,372, 176,4 
,344, 162,4,0,0,0 

320 DATA 8,21,8,20,8,80,8.5E, 8,23,8,56,8,23,8.4E, 8, [4556] 
23,8.46,8.23,8.ED, 8.B0,8.7A, 8.EE, 8.7F, 8.20,8.F1,8.7B 
, 8.EE, 8.30,8.20,8.EC, 8.C9 

330 RESTORE 320: FOR i=8,9F00 TO 8,9F17:READ [3604] 

wert:POKE i,uert:NEXT i 

340 SAVE "MADN-MCODE", b, 8.8000,8.1F20 [ 1874] 

350 END [ 110] 

360 DRAWR 20,10,5:DRAWR -20,10:DRAWR -20,- [6402] 
10 : DRAWR 20,-10:M0VER 0,10:CALL 8,A200,feld 
f:MOVER 0,-10:RETURN 

370 DRAWR 20,10,5:DRAWR -20,10:DRAWR -20,- [6402] 
10: DRAWR 20,-10:M0VER 0,10:CALL 8,A200,feld 
f:MOVER 0,-10:RETURN 
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B. Hunter: 

C - eine Einführung 
Sybex-Verlag 1986 
293 Seiten 
ISBN3-88745-632-7 
Preis: DM 48,- 

Als eine der höheren Pro¬ 
grammiersprachen erlangt »C« 
in jüngster Zeit immer mehr 
an Bedeutung. Gerade Pro¬ 
grammierer der Systemebene 
greifen immer häufiger auf 
diese leistungsfähige Program¬ 
miersprache zurück, das be¬ 
kannte UNIX steht hier nur als 
Beispiel. 



Eine Einführung 



Das vorliegende Buch gibt nun 
eine verständliche Einführung 
in die Sprache C, wobei die Be¬ 
triebssysteme CP/M (MP/M), 
MS-DOS sowie UNIX ange¬ 
sprochen werden. Zahlreiche 
Programmbeispiele (z.B. ge- 
bufferte Datei-Eingabe) bezie¬ 
hen sich auf die eben genann¬ 
ten Systeme. 

Nach einem kurzen geschicht¬ 
lichen Überblick über Entste¬ 
hung und Geschichte werden 
die ersten Strukturen von C er¬ 
läutert, auch Vergleiche zu 
BASIC gezogen. Der erfahre¬ 
ne BASIC-Programmierer be¬ 
kommt dadurch immer wieder 
Vergleichshinweise und lernt, 
die strukturierte Program¬ 
miersprache besser zu ver¬ 
stehen. 

Nach und nach wird der Leser 
in Kapitel wie Operatoren, 
Datentypen, Speicherkatego¬ 
rien sowie Ein-/Ausgabeope- 
rationen eingeführt, wobei 
sich die Programmbeispiele 


als nützlich und praxisorien¬ 
tiert erweisen. 

Dieses Buch will eine Einfüh¬ 
rung sein und ist besonders für 
diejenigen geeignet, die sich 
mit dem Gedanken tragen, die 
Sprache C unter einem der 
o.g. Betriebssysteme einzuset¬ 
zen oder sich darüber infor¬ 
mieren zu wollen. 

Böcker/Fischer/Plehnert: 
Interaktives Problemlosen 
mit LOGO 
IWT-Verlag 1987 
266 Seiten 
ISBN 3-88322-104-x 

Im vorliegenden vierten Teil 
der praktischen LOGO- 
Projekte dreht sich alles um 
Spiele. Vordergründig geht es 
natürlich darum, vorhandene 
Spielideen bzw. Vorlagen so¬ 
wie deren Algorithmus mit 
Hilfe der Programmiersprache 
LOGO auf einen Computer 
umzusetzen. So wurden be¬ 
kannte Spiele wie NIM, Re- 
versi, Black Jack oder das be¬ 
liebte Game of Life in LOGO 
realisiert. 



Der Begleittext ist verständlich 
geschrieben und zeigt ein¬ 
drucksvoll die Erarbeitung 
und Umsetzung von Algo¬ 
rithmen. 

Einziger Haken: Die Pro¬ 
gramme sind in IWT-Apple- 
LOGO gehalten und bedürfen 
weniger Anpassungen an das 
CPC-LOGO. Trotzdem kann 
dieses Buch allen LOGO- 
Freunden wärmstens empfoh¬ 
len werden. 


Bücher—| 


P. Koster: 
Struktogramme 
Top-Down-Technik 
Frech-Verlag 1986 
154 Seiten 
ISBN 3-7724-5359-7 



Die Programmiersprache BA¬ 
SIC ist in vielen Programmie¬ 
rerkreisen verrufen, erzeugt 
einen »Spaghetticode«, heißt 
es oft. In der Tat lassen sich in 
BASIC zur Erreichung eines 
Programmablaufs so manche 
Tricks verwenden, können 
»Brücken« gebaut werden. 
Diese Form der Programmie¬ 
rung ist also nicht strukturiert. 
Als Hilfsmittel steht aber auch 
dem BASIC-Programmierer 
das sogenannte Struktogramm 
zur Verfügung, das den Pro¬ 
grammablauf in allen Einzel¬ 
heiten festlegt und in der Regel 
erstellt wird, bevor der Rech¬ 
ner auch nur angeschaltet wur¬ 
de. Um diese Struktogramme 
geht es in dem vorliegenden 
Buch. Der Autor geht dabei 
auf die verschiedenen Regeln 
und Arten von Struktogram- 
men ein und zeigt anhand des 
Problemes Blocksatz ein Pro¬ 
grammbeispiel auf. Dieses 
Programm ist in IBM-BASIC 
geschrieben (läßt sich aber 
leicht anpassen) und weist eine 
tolle Lernhilfe auf. Das Pro¬ 
gramm zeigt via eingebautem 
Monitor den Weg durch das 
Struktogramm — eine wirk¬ 
lich tolle Idee. Alles in allem 
ein Buch, das die Erstellung 
von Struktogrammen sehr gut 
darstellt und zum strukturier¬ 
ten Programmieren aufruft. 


Leistungsbeweisj 
Der Schneidert 



PC 1512 SD/MM 

mit 20 MB Festplatte 

nur DM 2999, - 

Ramerweiterung 

FÜR PC auf 640K 79,- 

2. Laufwerk 399,- 

BTX-Software Decoder 

MS-DOS Version Mono398, - 

Star Writer PC 398, - 
Schneider W-Star 199, - 

Finanzierung möglich 


COMPUTER-TEAM 

Cuxhaven 

Tel.(04721)22299 

Lieferung per Nachnahme 
V-Scheck (Versandfrei) 


Achtung 


Disketten 


NAGAOKA 3“ -Disketten CF 2 DD 
(für alle 3" -Laufwerke) 

10er Pack 

DM 75, - 


Diskettenboxen 


Diskettenbox SS 50 
für 50 3" - oder 3 1/2“ Disketten, 
abschließbar/tragbar, 
Rauchglas 


dm 19,90 


Festplatten 


TANDON 

3,5" FESTPLATTE 20 MB einbau- 
fertig und vorformatiert für 
den Schneider PC 

dm 1398, - 


Ferdi’s Computer Software 

EDV-Service 


Inh. Ferdinand Göddeker 
Höfteslraße 32 
4400 Münster 
Telefon 0251/619881 
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I—Händlerverzeichnis 


Berlin 


Hamburg 


Basel 




Hard- u. Software 

• Commodore 

• Joyce «PC’S 


Öffnungszeiten Mo-Fr 10-18 Uhr • Sa 10-13 Uhr 

VI 


WOLFGANG MÜLLER und 
JÜRGEN KRAMKE GbR 


mükra 

DATEN-TECHNIK 


Schöneberger Straße 5 • 1000 Berlin 42 • Tel. 030-752 91 50/60 


Elektr. + elektronische Geräte, 
Bauelemente +Werkzeuge 

ELECTRONIC VON A-Z 

Stresemannstr. 95 • Berlin 61 
Telefon (030) 2611164 



Thörner's 

Büro “SrLaden 

Das Fachgeschäft speziell für „ausgefallenes" Computer-Zubehör. 

Mit BeratungI Riesenauswahl ... -j- 

C-Schneider VOr+eX 

^cohputer Division c „„ ,T, . , ■ , . , IM ; 

Unverbindlich 'mal reinschauenl Sie werden überrascht seinl 

B 62, Innsbruckor Straße 56 itfll innO Eine Filiale der Firma 
am Bayerischen Platz / 04 *tU jZ Bürobodarf Thörner 


Bonn 


RADIO-FERNSEH 

HIFI-VIDEO 


SERVICE SERVICE SERVICE SE RVICtj 


Plittersdorfer Straße 206T elefon (02 28) 36 40 29 



Castrop-Rauxel 


EHE GUTE IDEE NACH OER ANDEREN 

Schuster Electronic 

COUPfTENt IN SACHEN COMPUIER 1 ElfCTROMC 

C Schneider 

COfiPUTEBOmsOn 

Vertragshandler 

fs Commodore 

Vertragswerkstatt 
Obere Munsterstr.33 4620 Castrop-Rauxel (02305)3770 




Löhne/Ostwestfalen 


f>)) 

Schneider Vertragshändler & Servicecenter 


Hard- & Software von A-Z für Ostwestfalen 

R^IO 

FRITZ •BERMEIER 

A 

•Computer‘HiFi‘Video*TV 


alles für Schneider vom 464 - Joyce 




Nürnberg 


\\\\\\\\\\\\\\\v 

COMPUTER-STUDIO 

BASEL 

G Schneider 

HO I 7 ! PUTER DIWSIQH 


PC 1512 


Reiterstraße 2. Nahe Neuweilerplatz. 4054 Basel Videotex 
Telefon 10611 39 14 14 

vv\\\\\\\\\\\\\\\ 

G Schneider 

HP conpuiER Division 

Vertragshändler 

Büro Knüppel & Co. 

Computer und Büromaschinen 
Riehenweg 81 (MUBA) 

4058 Basel 
Telefon (061)261262 


Computer slore. 


Hocbslraße 11 
8500 Nürnberg 80 
Tel 0911/28 90 28 


_C-* Schneider_ 

^COnPUTER Division 

Wir lühren zu den original SCHNEIDER-Produklen Software, Bücher und 
Zubehör verschiedener Firmen wie DATA BECKER, VORTEX, CUMANA, 
ISS, RUSHWARE, MARKT & TECHNIK. SYBEX, VOGEL-Verlag usw.! 



Zürich 



Computershop 

zentral in Seebach, Schaffhauser Str. 473, 8052 Zürich 

Telefon: 01-302 26 00 

Versandkataloq anfordern_i 


Steinfurt 


ATARI SCHNEIDER STAR NEC SEIKOSHA PANASONIC EPSON 


©omputer 

©üromaschinen 


Tel. (0 2551) 2555 


ervice 


CBS GmbH • Tecklenburger Str. 27 • 4430 Steinturt 


Eintragungen 
im Händlerverzeichnis, 
nach Städten geordnet, 
kosten je mm Höhe 6, - DM bei 
einer Spaltenbreite von 58 mm. 
Einträge möglich 
mindestens 
6 x innerhalb eines 
Insertionsjahres. 

Nähere Informationen: 

Wolfgang Schnell 
Telefon (0 56 51) 8702 


Düsseldorf 


Vellmar 


Schneider 

mm qi ITC.Q rui ncmn 

L IJIII U I OK Ulk' IJIUl I 

L'CL 


Beratung 

Vertrieb 

Service 


BÜRO-ORGANISATION DATENTECHNIK Verlnebsgesellschall mbH 
4000 Dusseldorlt Fnedenslraße 13 Tel 0211/308071 


G Schneider 

0 CunPUTER OlVISIOn 



Holländische Str. 121,3502 Vellmar, Tel.: 0561/82 81 60 


Anzeigenschluß für die nächste 
Ausgabe 5/87 
von 

PC Schneider International 
ist der 

25.3.87 

Erscheinungstermin 
ist der 

29.4.87 
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Kleinanzeigen—i 


Achtung! 

An alle CPC-User-Clubs! 
Suchen Sie noch Mitglieder 
oder wollen Kontakte zu 
anderen CPC-Usern oder 
Clubs knüpfen 
Dann schreiben Sie uns 
doch einfach. Wir veröffent¬ 
lichen jede Anschrift eines 
CPC-User-Clubs gratis! 

Falls auch Ihr User-Club sich 
einmal vorstellen möchte 
(evtl, mit Foto), nutzen Sie 
unsere Zeitschrift als Ver¬ 
bindungsglied und Kontakt¬ 
adresse! 


JOYCE USER in GRAZ/STEIERMARK 

zum Erfahrungsaustausch oder für 
Clubgründung gesucht! 

Kontaktadresse: 

H.M. 

A—8041 GRAZ, 

Postfach 96 


Kontakt zu bereits bestehenden PC 
1512-Clubs im Raum Mannheim/Ludwigsha¬ 
fen gesucht. 

Auch Gründung eines Clubs möglich, falls ge¬ 
nügend Interesse vorhanden. 

Izzet Haydin, 

Werderstr. 9, 

6800 Mannheim 1, 

Telefon: (0621)4411 21 


Schneider PC Club Wasserburg am Inn, 
für PC 1512 geplant. Wer hat Interesse 
(auch Umgebung)? Bitte melden bei: 

Th. Specker, 

Spitzensteinstr. 35, 8094 Edling, 

Telefon: (08071) 6511 


Das tapfere Schneiderlein 

sucht noch Mitglieder 
Marcus Odorfer Kian Ghanai 

Erlenstr. 13 Im Steller Sande 69 

2800 Stuhr 2 Groß Mackenstedt 


* 

CPC - USER - CLUB 

„ 

* 

(Flensburg) 

* 

* 

Knut Ley 

* 

* 

Postfach 2124 

* 


2390 Flensburg 

* 


Clubbildung im Raum Wes./Vörde/Din. 
angestrebt. Kontakt PC/MS-DOS Usern 
gesucht. (Bes. PC 1512). 

Dieter Repaschewsky, 

Dinslakener Str, 80 

4223 Voerde Tel.:(02855) 1 71 06 


CPC-User sucht Verbindung im Großraum 
München zum Software- und Erfahrungsaus¬ 
tausch. 

Thorsten Brandt, 

Kreuzeckstr. 11 
8022 Grünwald 


CPC 6128 Kontakt zu Anwendern oder User 
Club gesucht, Raum München 
Helmut Tatje, 

Brehmstr 6 
8000 München 90 
Telefon: (089) 658204 


Schneider PC 1512-User sucht Kontakt zu 
anderen PC Besitzern zum Software- und 
Erfahrungsaustausch. 

Christian Heger, 

Bgm. Trautwein-3, 

D-8939 Bad Wörishofen 
Tel.: (08247) 4230 


POUG-Public Domain User Gruppe 

sucht interessierte CP/M-Freaks 

Info gegen DM 1,60 Unkostenbeitrag von: 

PDUG.Pf.1118, 

6464 Altenhasslau 


— H e I p — 

Schneider CPC-User sucht Kontakt zu 
Anfängern(innen) od. Profis im Raum 
Hamburg-Bergedorf u. Umgebung. 

Bin es leid, allein vor meinem 6128 zu sitzen 
und zu verzweifeln. Hätte an einer Clubgrün¬ 
dung Interesse, da ein großer Raum zur 
Verfügung gestellt werden könnte. 

Ich bin 34 Jahre alt und besitze seit ca. 

8 Wochen einen CPC 6128. Die Nachbarn be¬ 
sitzen natürlich nur den C-64. 

Tel. (040) 7246041 


Computer Cracker Club 
sucht noch Mitglieder in ganz Europa. 
Bitte meldet Euch bei: 

Tobias Roß Julio Rodriquez 

Marqueritenweg 15 Krankenhausstr. 56 
5030 Hürth 5030 Hürth 

(02233) 76032 (02233) 75434 

Nur Schneider & Commodore Club! 


CPC USER Treff 

20.00 Uhr Gaststätte »Weinberg« 
Weinbergweg 182, 

79 Ulm 

Jeden 2. und 4. Freitag im Monat 


CPC-Club MAGIC KEY 

sucht noch Mitglieder im Raum Bremen. 

Regelmäßiges Clubtreffen!!! Infos bei: 

Michael Hollmann 

Starnberger Str. 46 

2800 Bremen 1 

Tel.: (0421)373700 


CPC KLUB IN LUXEMBURG 

Byte Nibbler Dudelange suchen noch 
Mitglieder. Interessiert ? 

SCHAEFFER Claude DUPONT Yves 
36, rue CUNGS 94, av GD Charlotte 
L-3446 Dudelange L 3440 Dudelange 


CPC-User-Club »Enterprise« 

Wir suchen Mitgleider und Kontakte zu 
anderen Clubs! Wir bieten: 
große Softwarebibliotheken, 
alle zwei Monate Clubzeitung, 

Basic- und Logokurse, 

Meldet Euch! Nähere Infos gratis! 
Brombeerweg 12, 

2878 Wildeshausen 


Mitglieder zur Gründung eines Schneider- 
Clubs gesucht, im Raum Münster. Vom CPC 
464 bis zum neuen PC (außer Joyce). Anfän¬ 
ger willkommen! 

Für den PC 1512: Ragnar Könemann.Telgen- 
str. 11,4410 Warendorf-Milte, (0 25 84) 4 78 
Für den CPC: Alexander Beck, 

Am Diengholt 9,4404 Telgte, 

Telefon: (02504) 2456 


Der Computerclub Leonberg nimmt noch Mit¬ 
glieder - auch aus überregionalen Gefilden 
- auf. Der Computertyp spielt keine Rolle. 
Servicepaket des Computerclubs Leonberg, 
Postfach 61 26,7250 Leonberg 6 anfordern! 


Biete an Software 


Wirtschaftliche Programme 
für die Arztpraxis auf 

* dem Schneider CPC, Joyce, PC 

* Fa. EFFEKTA, Am Wiggert 9c 

* 45 Osnabrück, (0541) 442416 G* 


*** JOYCE PCW: LITB0X2 *** 

das (stark verbesserte), universelle 

KARTEI-PROGRAMM (vgl. CPC 6/86). 
DM 39,-. Info gegen Rückumschlag: 

K. Wiltsch, Südstraße 9, 

3501 Schauenburg 


ARCHITEKTEN UND INGENIEURE 

Gehen Sie mit der Zeit und erstellen Sie 
Ihre Leistungsverzeichnisse mit dem JOYCE 
und der Software vom 
Büro für Software-Entwicklung, Sonnenstr. 43 
5270 Gummersbach, Ruf (02261) 65434 I 

G 


HAUSFRAUEN UND HAUSMÄNNER 

führen ihr Haushaltsbuch mit der Joyce 
Einnahmen-Überschußrechnung COMAC- 
KASSE. Selbständige und Freiberufler 
erstellen damit aber auch 
ihre UST-Voranmeldung. 

Verlangen Sie Gratisinfo oder Demo vom 
Büro für Software-Entwicklung, Sonnenstr. 43 
5270 Gummersbach, (02261) 65434 

G 


**** LOHN- UND EINKOMMENSTEUER **** 
Super Jahresausgleich + Steuerkl.-wahl + 
Rentenertrag + Analyse! Für ’ CPC’s + IBM* 
Cass. 60,- Disc. 70,- DM Info gg. RP 
Jährl. Aktu. 10,-DM! Horst liehen, Nieder- 
felderstr. 44, 8072 Manching (08459) 1669 

G 


* HÖCHSTPREISE 
für gebr. COMMODORE/SCHNEIDER 
bei Computerneukauf bietet C. V. T. 
55 Trier, Pf. 2106, Tel.(0651) 1 6366 

G 


EDV - BUCHVERSAND 

Fordern Sie noch heute unsere 
Unterlagen an kostenlos! 
Tel. (04264) 2263 


*** TIEFSTPREISE *** 
10 MAXELL 3“ DISKETTEN DM 69,90 
10 No Name 3,5" DISK. DM 29,90 
10 No Name 5,25" DISK. DM 6,90 
Info von Computer*Versand*Trier 
55 Trier, Pf. 2106 Tel. (06 51) 1 63 66 G 


* Das Super Angebot ★ 

COMTEC 51/4“ 

2D. Double Sided, double Density, 

10 Stück 45,- DM 

3“ Disketten Maxell CF2, 10 Stück 77 - DM 
IBM und Kompatible an CENTRONICS 
Abgeschirmtes Rundkabel. Professionelle Qualität 
. Standard Belegung mit Reset-Leitung geschaltet. 
Abgeschirmte Stecker . C-Pins vergoldet . ca 1,8 
K&R Computershop, Friedrich-Wilhelm-Straße 48 
3440 Eschwege 

G 


Gratisinfo für jeden Schneider CPC 
anfordern bei 

Friedrich Neuper, 8473 Pfreimd, Postf.72 

G 



DISKETTEN 


* 

51/4", 

48 tpi, DM 

0,97, 

2 D 

* 

31/2", 

135 tpi, DM 

2,70, 

1 DD 

* 

31/2“, 

135 tpi, DM 

2,95 

2 DD 

* 

3" Markendisk. DM 

7,20 

2 CF 

* 

auch andere, bes. Garantie 


* 


* Allgem. Austro-Agent. Ringstr.10 

* D-8057 Eching, Tel.: 081 33/61 16 * 

G 


Wordstar 3.0 mit Mail Merge 
3" incl. Sicherh. Disk und Hand¬ 
buch DM 160,- Tel.(0531) 1 8428 


■■JOYCE/PC 1512‘HARD + SOFT ■■ 
■■ + Zubehör I! Günstig!! ■■ 

Mich. Mischke Microelectronic 
8384 Unterhaid 37 /Tel. (09954) 857 

G 


dBase II für Joyce, Original mit Handbuch, 
für 110,- DM zu verkaufen. B. Renard, 
Tel.:(0431)567575 


Diasortierprogramm für 
Schneider CPC, JOYCE und PC 
Info gegen Rückporto bei: 

Dipl.-Ing. W. Grotkasten, 
Birnenweg 6, 7060 Schorndorf 
Tel.: 071 81/42846 G 


** Super JOYCE-Spiele ** 

Frank Bruno’s Boxing (Boxkampf) 56,90 
Classic Collection (3 Arcade-Sp.) 45,90 

Strike Force Harrier (3-D Flugsim.) 59,90 
Bounder (schnelle Arcade) 39,90 

Tau Ceti (Weltraumschießspiel) 59,90 

The Pawn (engl. Grafikadventure) 69,90 
Tomahawk (Hubschrauber-Flugsim.) 59,90 
Cyrus II 3-D Chess (Schach) 47,90 

Tasword8000 dt. (Textverarbeitung) 139,90 
Wir haben noch mehr für JOYCE: 
SUNSHINE-Software, A d. Schilde 14 
5270 Gummersbach, Tel. 02261/75752 
* In Luxemburg unter Tel. (00352)818212* 

G 


Lohn- und Einkommensteuer 1986 

Druckerausgabe + Datensicherung 
Ausführliche Anleitung/ Info 1,50 
3“-Disk f. CPC 79,- DM + VP 
Versand gegen Vorkasse oder NN 
87er-Aktualisierung 20,- DM 
S. Teurich, Mesternstr. 6, 

4952 Porta Westfalica G 


*** AKTIENCHART *** 
Analyse mit Durchnittsbe- 
rechnung und P&F. Maximal 
60 Werte möglich. Aktuelle 
G/V Berechnung u.v.m. 

Preis 99,- DM Diskette 
Info: Christian Nalasek, Im Hespe 40 
3008 Garbsen 4 


Orig. Star-Writer + Profi-Painter 
neu je 100,-(0821)491546 


■■ PC Super Vokabeltrainer ■■ 
Nur 40,- DM Vorkasse. Holger Groß 
Am Ginsterberg 13, 6630 SaarLouis 
■■ Suche Tauschpartner ■■ 


Wordstar f, 1512, neu, orig, mit Handb. 
für 100,- (040) 7967812 ab 18 Uhr 


Verkaufe: Star-Writerl Ver. 3.0 130,— 
Turbo Graphix Toolbox 150,— 

Dateistar 80,- Music System 50,— 
Superpack 80 für 90,- 
Alles Original und auf CPC 464 lauffähig 
Tel.: (089) 423405 


i 


4’87 PC 161 



















































I—Kleinanzeigen 


> Neue PC-Spiele <- 

Wintergames/Summergames je 64,90 
Pitstop II (Autorennen für 2) 69,90 

Strip Poker (???) 59,90 

Cyrus II Chess (3-D Schach) 69,90 

Bruce Lee (Hüpfspiel) 59,90 

Unser PC-Liste enthält noch mehr Spiele 
für Ihren PC 1512: SUNSHINE-Software, 
Auf dem Schilde 14,5270 Gummersbach, 
Tel. 02261 /75752 G 


★ SUPER-LIGA-PROGR. UNIVERS.!* 

★ Statistiken, Graphiken uva! ★ 

★ Cass. 25,- DM; 3“ Disk. 35,- DM ★ 

★ Marco Groll, Tel. (0 64 03) 46 82 ★ 


JOYCE-Software wegen System¬ 
wechsel preiswert zu verkaufen 
z.Bsp: dBasell, FIBU-STAR, Turbo 
Adress, Statistik-Star u.v.m. 

Günter Rockenfeller 
Haarweg 63 
5870 Hemer 
Telefon: 02372/1854 


SUPERCLAC 2 für JOYCE 100,- DM 
originalverpackt (0 86 23) 6 22 


■ JOYCE - Originalsoftware ■ 

■ dBasell 130,-M+T Fakturier. 75,- ■ 
■Businesspack (Adr/Rechn/Lager) 130,-■ 

■ Multiplan 140,- Tel.(0631)60226 ■ 


Schn. ComPack Buchführungssyst. 
für CPC 464, 664, 6128 best, aus: 
Sachkonten-, Debitoren-, Kredit- 
Buchhaltung, sowie Lagerbestands¬ 
führung u. Auftragsbearbeitung. 

DM 200,- (Neupr. DM 798,-) Kienzl, 
Postfach 22 65, 8520 Erlangen 


FIBU STAR PLUS-JOYCE unbenutzt 
kplt. mit Kontenblättern zu verk. 
oder Tausch gegen Akustikkoppler 
Tel. (0 45 04)47 78 


Brandaktuelle Software wegen 
Systemaufgabe abzugeben. 
Andree Janz, Bromberger Str. 18, 
2850 Bremerhaven (04 71) 51414 


Wordstar, dBase II, DR Graph 
alles Original je 100,- DM 
Tel.: (021 62)40536 ab 19.00 Uhr 


Biete preiswerte Software an 
Anwenderpr. + Spielprogramme 
Info gegen 2,- DM in Briefmarken 
MSV-Software, Postfach 1227 
4506 Hagen A.T.W. G 


****** APFELMANN-GRAFIK ****** 
schnellstes und vielseitigstes 
Programm jetzt für alle CPC’s! 

Kass. 20,-, Disk. 30,-, Vorausz. 
Gerhard Knapienski 
Fraunhoferstr. 8, 3 Hannover 1 
Postgirokonto Han: 4711 13 - 309 


dBasell DM 100,-; Locksmith, STAR- 
Datei, STARtext, EMS, Multitext 
je 40,-; Datenrem, StatSTAR, Mini¬ 
office je 30,-. Tel. (0 2642) 33 68 


KURVENDISKUSSION FÜR JOYCE 
mit Grafik! Disk 40,-; Info geg. Porto bei: 
Lothar Maier, Killesrainstr. 18 
7531 Eisingen 


VERKAUFE JOYCE SOFTWARE 
Einnahmen-Überschuß Rechnung 
Adressverwaltung / Schach Spiel 
Databoxes / Flugsimulator 
Thomahawk / Arcade Spiele 
(05931) 1 71 72 


* ’ IBM/Schneider PC + Kompatib. ’ * 
Free Software - jede Disk, nur 5,- DM 
Info kommt sofort. Tel.: 0212/431 40 


Turbo Pascal (JOYCE/CPC) M. Grafix 
150,-, Mica, Batman, 3D-Chess (JOYCE) 
Tel.(05251) 64840 


JOYCE: Professionelle Software 
Public-Domain, etc. Liste: 1,50 DM 
SKY Software, Fa. Frenzei 
Am kl. Rahm 101,403 Ratingen G 


*** SCHALTBILD - CAD 1 

Schaltbilder mit dem CPC alle 
gängigen Bauteile in Bauteilebiblio¬ 
theken mit Epson-Hardcopy 
C/D 45,- / 55,- DM 

********* BANK 111 ********* 

als Bankkontenführung, Haushalts-Kassen¬ 
buch od. kleine Gewinnrechnung - 
max. 400 Buchungen je Abrechnung 
C/D 30,- / 40,- DM 

***** VOKABELTRAINER 111 ***** 

auch für Franz., komfortabel, max. 

1000 Vok. Lekt. -C/D 20,- / 30,- DM 
Preise bei Vorkasse od. zuzügl. NNGeb. 
Software D. Thiesen, Rathausstr. 70, 

5410 Höhr-Grenzhsn._ G 

FREESOFT für Schneider PC 
Info: Jürgen Eckerth, Unterm Buchwald 3, 
6296 Mengerskirchen 1 


PC - Public Domain Disketten nur 10,- DM; 
4 Katalogdisketten und 1 Game-Disk gegen 
20,- DM (Bar o. in Briefmarken) 

Kurzinfo gegen 6,- DM 
B. B. - Club, Postfach 161, 

6430 Bad Hersfeld G 


> CPC: 4 DB-Bücher < (0 57 31) 2 93 32 


Verk. Org. Spiele (Disc): Elite (D) 
55,- DM; SWords&S. 45,-; Knight Games, 
Wizard Lair je 40,- DM Cass: Space 
Harrier 25,- DM; One M.A.H.D. 5,- DM 
A. Cavalieri, Poppenlauerstr. 2 
8734 Massbach, Tel.: (0 97 35) 2 55 


■ Joyce-Originalsoftware ■ 

dBase I1100,- DM Multiplan 100,- DM 
DMV: prakt. Textverarbeitung 70,- DM 
Colossus Chess 30,- DM (0 22 71) 6 38 37 


FINANZ (für alle CPC) 

Das »bessere« Programm! (Den 
Unterschied sehen Sie, wenn Sie 
‘sich schon mit anderen Progr. 
herumgeärgert haben!) 

10 Einnahme-, 30 Ausgabe-,10 
Schuld-, 1 Forderungs-Posten; 
alle Posten frei oenennen; 
Fälligkeiten d. Ausg./Ratenhöhe 
d. Schulden festlegen/anzeigen; 
Posten gegen Buchung sperren; 
automatische Schuldenbuchung; 
Listen ausdrucken; Programmbe¬ 
schreibung laden/drucken uvm. 

C 20 DM, D 30 DM (incl. Porto) 
J. Herrmann, J.-Schmidt-Str. 16, 

1 Berlin 44, Tel.(0 30) 6851212 


Word Star-Org. (PC 1512) 100,-T.: 089/789377 


Biete an Hardware 


Neue und gebrauchte CPC/PC Hardware * 
Floppy 3/ 3,5/ 51/4“ * Festplatten * Drucker* 
Vortex Geräte* Eintausch bei Systemwechsel 
* Reparaturservice * Software * Abrechnungs¬ 
programme für Finanz- Lohn- Immobilien¬ 
verwaltung /Vermittlung, Ärzte, Handwerker, 
Schornsteinfeger, KFZ-Handel * 

Manfred Kobusch, Bergenkamp 8,4750 Unna 
Tel: (02303) 1 3345 G 


6128 mit Erweiterungen: V 24, 
CENTRONICS, Netzteil, PIO im 19 Zoll 
Gehäuse. + Turbo Pascal, Textomat, 
Hardcopy. Für Amateurfunker RTTY 
Hard- und Software. 04 41 / 3 45 28 


DIN-A3-PLOTTER ab DM 798,- 

Einführungs- ANGEBOT 

Fa. Hein-S. Kiefer, Castroper Str. 129 
Tel.: (02 31) 33 36 67/33 40 91 G 


Erweiterung auf 640K für Schneider-PC, 
18 IC’s nur 89,- DM 
Schmidt, Zum Sonnenhang 17 
5210 Troisdorf 


Verk. DMP 2000 (8 Mon. alt) + Kabel 
f. 6128 + 2xErsatzfarbb. = DM 490,— 
Fickinger, Finkenweg, 8901 Diedorf 


SD 15 Typenraddrucker mit LOCO 
15 Programme neu Tel.: 05 31 /1 84 28 


JOYCE PCW8256 + Turbo Pascal + 
Turbo Toolbox + Cobol + Fortran + MICA + 
Wordstar etc. kompl. 1300,- DM 

5,25" Floppy für Joyce (1MB) 500,- DM 

Tel.: 05251/64840 


CPC 6128 Grünmon. + 2. Laufwerk, Drucker¬ 
kabel 2m, Orig. Wordstar, 24 Disk. Anw. 
Software + Spiele, 30 Zeitschr. + 
DB-Buch CPC Intern., VB: 1350,- DM 
Tel.(089) 8577185 ab 18.00 


CPC 464 Grün + DD1 + Joystick + Software 
VB 800,— 089/336671 abends 


CPC-464 - Color - 320 KB (SP64) + 

2. Laufw. (DDI1 + F1-X) + Lightpen + 
Literatur + alle CPC-lnternational + 
Profi-Painter + Star-Writer 3.0 + 
dBase + Multiplan + Wordstar + Mica + 
Assembler + Statistik-Star + viele 
Spiele + Databox + 30 Disketten 3“ 
2200,-DM Tel.:(021 73)4 29 91 


Joyce 8256 + Software 1600,- DM 
Tel.:(02302) 61747 ab 17 Uhr 


JOYCE GR. RAM-Disk, viel Software, 
2 M+T Bücher Tel: (04 61) 612 55 


CPC464 / Farbe + DDI1 + FD1 + SP64 + 
NLQ401 + Kab. + Softw. + Lit. + MousePack 
VB 2500 DM Tel. 04255/285 NP: 4000,- 


Vortex FIS für 500,- DM, 
Microscan MS15 Typennraddrucker 
wie Schneider SD15 für 500,— 

Tel.: (0 89)87 85 59 


CPC 464 + Colour + DDI1 + Softw. und 
Extras. Infos: 0 71 35 / 63 84 n.18.00 


3,5" Doppellaufwerk von Vortex mit 
VDOS 2.0 u. CPM 2.2 
für CPC 464 VB 1100,- DM 

Telefon: 0231/256009 ab 18 Uhr 


CPC 464 128K + DDI1 + FDI (2. LW.) 

+ DMP 2000 + Star-Writer + Star 
Datei + Databox kompl. + CPC Int. 

+ Verschiedenes 

VB: 2150,- Tel.: 09621 /25736 


Joyce Plus PCW 8512 

Mit 10 Disketten und den Programmen 
Wordstar, Turbo Pascal, dBasell, 

DR. Graph, DR. Draw, Mica, 
Multiplan u. Pascal MT + 
Komplettpreis 2.500,- DM 
Tel.: 06362/2483 


CPC-6128 Grünmonitor + DMP-2000 
Christian Reusch Tel.: 0241 /17 21 29 


Verkaufe CPC 664 + Grünmonitor 
Preis: VB 750,-DM Tel. (06835) 8912 


Joyce 6 Mon. alt + dBasell + Prompt 
+ 10 Disk incl. Literatur 1600,- DM 
Tel.: 0208/50455 


CPC Grün + Soft- + Hardware + Zeitschr. 
VB 600 DM Knab 072 02 / 6615 


CPC 6128 Grün + DMP2000. 5 Mon. alt 
Zus.: 900,- Tel.: 07147/1 2448 


CPC-464 Grün 390,- DM, NLQ-401 + 

Traktor 390,- DM, Software (Word¬ 
star, Disk-Mon, Tools, Games...) 130,- DM 
Alles VB Tel.: 069/558333 


3" Doppellaufw. incl. Control, f. CPC 464 
DM 495,- Tel.:(061 81) 81848 


JOYCE 8256 mit 10 Disketten u. 

CP/M + Buch v. M+T, VB 1400,- DM 
Tel.: 0881 /2906 oder 089/43189555 


CPC-464 + Grünmon. + DD1 + NLQ 401 
+ Traktor + Bücher + div. Software 
DM 750,- Tel. 07141/3 2314 ab 18.00 


Vortex F1/D, Tel.: 0 54 72 / 37 72 


CPC 464 grün + Software + Buch + 
Joystick fast neu für 600,- DM 

Tel.: 06054/5315 Jochen Eurich 


Für Joyce: Interf. CPS 8256 

(neuw.): 80,- DM; Prompt + Prompt-Druck 

(or.-Progr.) 80,- DM; M. Tillmanns, 

Postf. 11 10 73,5650 Solingen 11 


Disc mit Joyce TPascal 3.0 Buch/ 
S. Micheler, Pf 90323, 8900 Augsburg 


CPC464 CPC664 CPC6128 User! 
Lichtgriffel mit Programmen 
und dt. Anleitung nur DM 49,— 
Versand gegen Scheck/Nachnahme 
Info gratis! Fa. Schißlbauer 
Postfach 1171S, 8458 Sulzbach 
Tel.: (09661) 6592 bis 21 Uhr 


JOYCE / PLUS 
SPEICHERW. 99,- 

von 256 kB auf 512 kB 
Aufrüstsatz mit ausführlicher 
Einbauanleitung auch für Laien. 

Tel.: (04721) 2 22 99 
COMPUTER - TEAM 
2190 Cuxhaven 1 

täglich von 16.00 bis 20.00 Uhr 
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Kleinanzeigen—i 


Suche Software 


Suche Checksummer für CPC 664 
Chr. Rommel, Wilhelmstr. 81,4500 Osnabrück 


Suche Wordstar 3.0, Multiplan, MP1 
(6128). Tel.:(0 70 31)41129 


Suche preisw. Programme für Schneider PC. 

H. Schmidt, Mühlenstr. 85 

4005 Meerbusch 3, (021 50)21 58 


Joyce Software und Spiele gesucht. 
G. Olbertz, Georgstr. 19 
5000 Köln 1 


Suche für JOYCE + Software 
für Einsatz in Fahrschule 
Fahrschule, Georg Gabbert 
Kön.-Ludw.-Str. 12, 3050 Wunstorf 


Für CPC 6128 

Turbo Pascal 3.0 + Grafik 

Bruno Matias Tel.: (089) 305412 


Suche Handbuch zu TexPack 
Tel.: (062 47) 2 59 ab 16.00 Uhr 


Welcher Kollege/in arbeitet in 
der tierärztl. Praxis mit dem 
JOYCE PLUS? Erfahrungsaustausch 
Dr. Lechtenböhmer, Bornenweg 16 
5231 Helmenzen (02681)5203 


Suche Hardware 


Kaufe Schneider JOYCE PCW 8256 
A. Krause, A.d. Kühl 62, 5800 Hagen 


Vortex FI X (464) gesucht. 

C. Geis, Grabenstr. 63, 5427 Bad Ems 


Gesucht von holländ. Schreibbüro: 
einzelne QWERTZ-Tastatur 
(komplett) für JOYCE. 

R. van Riedhoven, Merellaan 2, 
5561 TK Riedhoven, Niederlande 
Tel: 00 31-49 70-129 86 


Dataphon S21-23D gebraucht zu 
einem akzeptablen Preis und 
Tauschpartner (Disc/CPC 464) 
gesucht. Angebot/Liste an: 

R. Urban, Uhlandstr. 9c, 

4500 Osnabrück 


Floppy DDI1 mit Controller 
ab 19.00 Uhr. Tel.: (02 34) 853803 


Suche DMP 2000 Drucker (0 84 58) 2013 


Tausche 


Tausche Spiele (Disk) 6128 

A. Vornholt, Silcherstr. 26,7306 Denkendorf 


CPC 6128 Tausche Turbo Pascal 
gegen Prof. Anwendersoftware 
unter CPM-3.0 Tel.: (089) 3203434 


Tausche 20 Original Discs 
(NP = 1159,05) + 100 DM gegen eine 
sofort anschließbare 31/2-Zoll 
Floppy. Schreibt an: 

Thorsten Jeske (bei Thadewaldt) 
Schoenstedtstr. 12,1 Bin 44 


Tausche Software für CPC 6128 auf Disk. 
A. Rau, Lindenstr. 6, 6209 Hohenstein 1 
Tel.: (061 20) 51 75 


Verschiedenes 


CPC-lnt-Nr. 3-12/86 + Cass. + Sonderheft 

+ Cass. Preis VB - ab 18.00 

Tel.: (02237) 52955 - Helmut Walenda 


Formatiere Eure Disketten so, 
daß Ihr 404 KB auf einer 
3“ Diskette habt, für nur 3,- DM pro 
Diskette + Rückporto (04 21) 5619 57 


TUNG ** ELTERN ** ACHTUNG ** ELTERN’ 
wer hilft mit bei der Erstellung 
von Lernsoftware für Vorschul- 
und Schulkinder, Info g. Rückporto 
Dipl.-Ing. R. Gehrmann 
G.-Disse-Str. 38c, 5350 Euskirchen 


ACHTUNG!! ACHTUNG!! ACHTUNG!! 
Wir schreiben Ihre Anwenderprogr. 
nach Ihren pers. Wünschen! 

Nur Schneider CPC od. PC! Infos bei: 

Chr. Hohl, Tel. (061 81) 77854 n. 18.00h 


PC 1512 USER-CLUB bieter Zeit¬ 
schrift + Software + mehr. Info 
gg. Rückporto von Rolf Knorre, 
Postfach 2001 02, 5600 Wuppertal 


KOMMEN SIE ALS AUSSTELLER !!! 

vom 4. - 6.9. nach Saarbrücken 
zu den 4. ELEKTRONIK & COMPU- 
TAGEN SAAR, der Verkaufs- und 
Informationsmesse, INFO: Com¬ 
putertage, Postfach 101260 
6620 Völklingen G 


Achtung! 

Versicherungsagenturen! 

Schneider Joyce Plus inkl. Soft¬ 
warepaket DM 2890,— 

E. Janku, Wassermannstr. 7 

8600 Bamberg. Tel. (0951) 33977 G 


Verk. CPC 3/85 - 11/86. Gesamtpr.: 
DM75,-. Tel.: (02451) 69703 **** 


WANTED! 

Kontakt zu Leuten, die in High- 
level-BASIC oder sonst. Programmier¬ 
sprachen auf dem CPC programmieren 
Bevorzugt PLZ-Ber. 73xx 
Harald Nockher, Herbstäckerweg 1 
7333 Ebersbach 1 


Das ist 
Ihre 

Chance.... 

schon eine Kleinanzeige 
bringt oftmals großen Er¬ 
folg und hilft neue Kon¬ 
takte zu knüpfen. 
Nutzen Sie unser Ange¬ 
bot und profitieren Sie 
von der Tatsache, daß 
unsere Zeitschrift 

»PC Schneider 
International« 

jeden Monat von mehre¬ 
ren zig-tausend Com¬ 
puter-Interessierten gele¬ 
sen wird. 

Möchten Sie etwas ver¬ 
kaufen, tauschen oder 
suchen Sie das »Tüpfel¬ 
chen auf dem i« - dann 
sollten Sie die eigens 
hierfür bestimmte Be¬ 
stellkarte im Heft ausfül¬ 
len und an unseren Ver¬ 
lag absenden. 

Ihre Annonce erscheint 
dann in der nächsten 
Ausgabe. 

Wir möchten ausdrücklich 
darauf hinweisen, daß wir 
keine Anzeigen veröffentli¬ 
chen, aus denen ersichtlich 
ist, daß es sich hierbei um 
Veräußerungen von Raub¬ 
kopien handelt. 

Des weiteren machen wir 
darauf aufmerksam, daß in¬ 
dizierte Computerspiele 
nicht in Form von Anzeigen 
beworben werden dürfen. 

Die Redaktion 


Wichtiger Hinweis für Kleinanzeigeninserenten 


Der Verlag behält sich vor, bei Softwareangeboten indizierte Spiele ersatzlos zu streichen. 
Folgende Video- und Computerspiele sind indiziert: 


Battlezone 
Beach Head 
Beach Head 
Blue Max 
Commando 
Desert Fox 


BPS-Report - Januar/Februar - 1/1987 S.41 


F 15 Strike Eagle 
Falcon Patrol 
Flyerfox 
Friday the 13th 
Green Beret 
Nice Demo 


Paratrooper 
Protector II 

Raid on Bungeling Bay 
Raid over Moscow 
Rambo, First Blood Part 
River Raid 
Seafox/Seawolf 


Silent Service 
Skyfox 
Speed Racer 
Stalag I 
Tank Attack 
Teachbusters 
Theatre Europe 
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Inserenten 4/87 


ABD Computer.69 

Activision.61 

Ahnataler Computer Laden.7 

Brot für die Welt.147 

Büro für Software-Entwicklung....57 

Byte me.137 

Comal.45 

Comal-Team.141 

Computer Max.81 

Computer Team.159 

CSV Riegert.31 

Data Becker.25,149 

DMV.33,67,105,109,117,131,165 

Dobbertin.151 

Eschcomp.158 

Ferdi’s Computer Software.159 

Franzis Verlag.41 

G Computerstore.31 

GAI.45 

Gerdes.75 

GfA Systemtechnik.2 

G + K Electronics.58 

Hashagen.9 

Henschke.59 

Hille Datentechnik.39 

Infosystems.103,139 

Interlogic.17 

Interest Verlag.37 

Keil.158 

Kempenich.101 

Kersten + Partner.58 

Kotulla.43 

Leethaus.57 

Leidinger + Haupenthal.43 

MicroMarket Worms.53 

Mükra.89 

Naujoks.151 

N+P Datentechnik.9 

Philosoft.8 

PR8 Softwaredienst.11 

Prosoft.121 

RB-Software.8 

Rushware.55 

SFK.6 

SKG Bank.53 

Softwarehandel Weber.132 

Syndrom.93 

Schneider Computer Division... 168 

Schneider Data.65 

Schüngel.101 

Schuster.83, 84, 85, 86 

Star Division.167,23 

TG-Soft.51 

Van der Zalm.145 

Vortex.79,155,157 

Wade.132 

Waldeck Software.63,97 

Weeske.72,73 

Werder.41 


Eine Bitte an unsere 
Abonnenten 

Vermerken Sie 
bei Schriftverkehr 
und Zahlungen 
neben der 

vollständigen Anschrift 
stets Ihre Abo- 
Nummer. 

Sie vermeiden 
damit unnötige 
Verzögerungen 
bei der 
Bearbeitung 
Ihres 

Abonnements. 
Vielen Dank. 

Ihre 

DMV-Versandabteilung 


Anzeigenschluß 
für die nächste 
Ausgabe 6/87 
von 

PC Schneider 
International 
ist der 

22.4.87 

Erscheinungstermin 
ist der 

27.5.87 
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Von Kennern und Könnern geschätzt 

... ein ausgezeichneter Jahrgang 


Experten halten die 86er Ausgaben des 
führenden Schneider Magazins für einen ausge¬ 
zeichneten Jahrgang. 



Experten sagen voraus, daß die 87er 
Ausgaben noch besser und informativer 

werden. 


Sichern Sie sich diese 
Qualität durch ein 
Abonnement. 


Vom Preisvorteil 
gegenüber dem 
Einzelbezug 
wollen wir 
gar nicht 
weiter 
reden. 


Schneider International 
im Abonnement: 


Bundesrepublik 

Deutschland 

12 Ausgaben 60,- DM 
6 Ausgaben 30,- DM 


Auslandspreise: 


Europa 

12 Ausgaben 90,- DM 
6 Ausgaben 45,- DM 


Außereuropäisches Ausland 

12 Ausgaben 120,- DM 
6 Ausgaben 60,- DM 

Die Versandkosten sowie Porto 
sind in diesen Preisen bereits 
enthalten. 



I—Vorschau 



5/87 


»PC Schneider International« 
erhalten Sie ab 29. April 
bei Ihrem Zeitschriftenhändler 


PC-Grafik ausgereizt. Wie der hochauflösende Gra¬ 
fikmodus in allen Farben ausgenutzt werden kann, 
zeigt unser Artikel im nächsten Heft. 


Berichte: 


Wir berichten aktuell über die Ce- 
Bit’87. Das größte Computer- 
Ereignis des Jahres gilt als richtungs¬ 
weisend für Trends und neue Tech¬ 
nologien. Aussteller und Besucher 
aus aller Welt nutzen die CeBit im¬ 
mer wieder als Forum für neue Pro¬ 
dukte und Informationen, die 
Computer-Welt ist eine Woche in 
Hannover versammelt. Die PC- 
Intemational Redaktion hat sich für 
Sie umgesehen und alle News zu¬ 
sammengetragen . 


Hardware: 




Wieder viele interessante Spiele in unseren Software- 
Reviews. 



Wishbringer ist eines der vielgerühmten Infocom- 
Adventures des Beginner-Levels. Ob Anfänger auch 
wirklich damit klarkommen, untersuchen wir in der 
nächsten Ausgabe. 


Eine ausführliche Umbauanleitung 
ermöglicht den »Umtausch« von 
Laufwerk A und B; jetzt kann CP/M 
auch vom externen Laufwerk aus ge¬ 
bootet werden! 


Programme: 


Für die MIDI-Freaks, die das Inter¬ 
face aus Heft 2/87 besitzen, jetzt die 
Software: Ein 8-Track-Sequenzer 
zum Nulltarif. 


Blockman 

- tolles Actionsspiel mit faszinie¬ 
render Grafik und hervorragen¬ 
den Soundeigenschaften. 
Dieses flotte und unterhaltsame 
Spiel begeistert jeden CPC- 
Anwender! 


Tips & Tricks: 


Benutzer des Betriebssystems CP/M 
2.2. werden sich über eine RAM- 
Disk freuen. Wir zeigen Ihnen, wie 
die Installation gemacht wird. 

Besitzer des Farbdrucker Okimate 
20 waren, was Hardcopyroutinen 
anbelangt, bisher nicht gerade ver¬ 
wöhnt. Wir stellen eine komfortable 
Routine vor. 


Joyce: 


Wir haben u.a. ein wirklich universel¬ 
les Programm zur Manipulation tabel¬ 
larischer Daten für Sie vorbereitet — 
lassen Sie sich von TabDat überra¬ 
schen! 


PC 1512: 


Ergänzend zu unserem MS-DOS- 
Lehrgang erfahren Sie Wichtiges 
zum Dienstprogramm Debug, das 
im Benutzerhandbuch nicht weiter 
erläutert wurde. Debug ist dabei ein 
nützliches Utility zum Auffinden 
von Softwarefehlern, sogenannten 
Bugs, und ist auch zur Manipulation 
von Programmen gut geeignet. 


Des weiteren werden Sie erfahren, 
wie der hochauflösende Grafikmo¬ 
dus des PC 1512 optimal ausgenutzt 
werden kann. Ein eindrucksvolles 
Demoprogramm rundet die ganze 
Sache ab... 
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Die Zukunft hat begonnen! 
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Dieses 
einzigartige 
Textsystem 
verfügt über 
4 verschiedene 
Arten der Be¬ 
nutzerführung. 


Der Anwender 
lernt und 
wächst mit 
dem System. 


S3 1. Text- 

Verarbeitung 

2. Adress- 
Verwaltung 

3. Graphik- 
Programm 

4. DFÜ- 
Program 




Ob Sie lieber mit der Maus, dem Pull-Down- 
Menue, Funktionstasten oder mit Controll- 
Codes arbeiten, dieses Textsystem paßt sich 
Ihren Fähigkeiten Schritt für Schritt an. 
Anfänger oder Profi, STAR-WRITER PC 
hält allen Ansprüchen stand. 

• Gleichzeitiges Bearbeiten von bis zu 7 Do¬ 
kumenten. 

• Graphiken können in den Text eingebun¬ 
den werden. 

• Formatierte Ausgabe auf dem Bildschirm. 

• Integrierte Fußnotenverwaltung. 

• Floskeltasten und Macrofunktionen. 

• Erstellung von Rundschreiben. 

• Erstellung von selbstrechnenden Formu¬ 
laren. 

• Erstellung eines Stichwort- und Inhalts¬ 
verzeichnisses. 

• Ausführliches Handbuch und Übungsteil. 

• Jetzt auch für die HERCULES-Grafikkarte. 


STAR-WRITER PC 


DasTextsystem für den Schneider PC 
und alle IBM-Kompatiblen-Rechner! 




UELZENERSTR. 12 Ä=r = - = 
2120 LÜNEBURG = 

FERNRUF (041 31) 402550 

TELEX 2 182 221 stard = = = 




GmbH 


' COUPON \ 

Coupon bitte ausfüllen, ausschneiden und an STAR-DIVISION schicken. ■ 


□ 

□ 


Bitte schicken Sie mir 
kostenlos und unverbindlich 
Informationen über 
STAR-WRITER PC 

Bitte schicken Sie mir 
STAR-WRITER PC zum 
Preis von DM 398,— 


Name . 
Firma . 

Strasse, 


PLZ/Ort, 


Unterschrift . 


Für Schneider PC und alle IBM-Kompatiblen-Rechner mit Monochrom- oder Grafikkarte J 

Alle Preise sind unverbindliche Preiscmpfehlungen zzgl. DM 10,- für Porto und Verpackung ^ 




























günstige Möglichkeiten 
der Finanzierung mit dem 

Schneider-Computer-Kredit 

durch die M SKG BANK 


COUPON 

Ich möchte mehr wissen über 
den Preisknüller des Jahres 



komplett 
jetzt nur noch 


C 3 Schneider Infoservice 

Widenmayerstraße 34 
8000 München 22 

CPC 4/87 


unverbindliche 

Preisempfehlung 


* Sowas gibt’s fast überall 
im guten Fachhandel, in den 
Fachabteilungen der Warenhäuser 
und bei den führenden Versendern. 

Schweiz fr 999 - / Österreich öS 8.999,- / Belgien bfr 22.990,- / Niederlande htl 1.399,- (incl. Soflware im Wert von 250,- hfl) 


















